Selecteur alphanumerique (vb.net 2010

Télécharger le projet
Commenter

Description

Selecteur Alphanumerique. Affiche les Lettres de A à Z et permet d'executer une action, en cliquant sur l'une d'elles.

Source / Exemple : 


Public Class Form1
    Dim MesLettres As New Collection
    '
    Private Sub ClickMesLettres(ByVal sender As System.Object, ByVal e As System.EventArgs)
        For i = 1 To MesLettres.Count
            With MesLettres(i)
                If .name = sender.name Then
                    .backcolor = Color.LightGreen
                    .forecolor = Color.Red
                    ExecutionSelecteur(i)
                Else
                    .forecolor = Color.Black
                    .backcolor = Me.BackColor
                End If
            End With
        Next i
    End Sub

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        For i As Integer = 0 To 25
            Dim x As New Label
            x.Name = "Lettre" & Str(Asc("A") + i)
            Controls.Add(x)
            x.Left = 10 + i * 25
            x.Top = 20
            x.Width = 20
            x.Text = Chr(Asc("A") + i)
            x.Font = New Font("Arial", 12, FontStyle.Bold)
            x.TextAlign = ContentAlignment.MiddleCenter
            MesLettres.Add(x)
            AddHandler x.Click, AddressOf ClickMesLettres
        Next
    End Sub
    Private Sub ExecutionSelecteur(I As Integer)
        MessageBox.Show("vous avez cliqué sur la case " & Chr(64 + I), "", MessageBoxButtons.OK)
        'Placez ici le traitement de chaque bouton
        'Exemple :
        'Select Case Chr(64 + I)
        '    Case "A"
        '    Case "B"
        '        ' etc...
        'End Select

    End Sub
End Class
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_jemade)