Bonjour tout le monde,

Voilà j'espere que vous aller pouvoir m'aider.

Je suis entrain de creer un petit annuaire téléphonique avec une combobox qui represente le nom de la personne et plusieurs textbox avec tel. fixe tel.portable

et aussi souhaiterais ajouter adresse, rue,code postal .....

quand je clique sur mon bouton quand je selectionne la personne mais ca marche pas.
Alors es ce que s'il vous plait quelqu'un aurais la jentillesse de m'aider pour les codes?

merci à vous

Voilà se que moi j'ai mis:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
     If ComboBox1.Text = "premier nom" Then
            Dim key As Integer
            key = (Rnd() * 1)
            Select Case key
                Case 1
                    TextBox1.Text = "telephone fixe"
                    TextBox2.Text = "telephone mobile"
            End Select
        End If
        If ComboBox1.Text = "deuxieme nom" Then
            Dim key As Integer
            key = (Rnd() * 1)
            Select Case key
                Case 1
                    textbox1.text = "y a pas de numéro"
                    TextBox2.Text = "telephone mobile"
            End Select
        End If
    End Sub