Dim x, z As Integer x = "Coucou" Debug.Print "x", x z = "Coucou" Debug.Print "z", zIl y a une erreur sur l'affectation de z parce que lui seul est correctement typé.
? maVariablepour qu'elle s'inscrive dans la fenêtre.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPrivate Sub Resultat_Click() Debug.Print x, y, z ' Affichera les valeurs dans la fenêtre de debug (Ctrl-G) nombre.Text = Str(x + y + z) End Sub
Private x As Integer, y As Integer, z As Integer Private Sub Initialiser_Click() Nombre1.Caption = " Nombre 1" Nombre2.Caption = " Nombre 2" Nombre3.Caption = " Nombre 3" Nombre.Text = "" End Sub Private Sub Form_Load() Initialiser_Click End Sub Private Sub Nombre1_Click() x = Val(Nombre.Text) 'Nombre est le name de ma zone de texte Nombre.Text = "" Nombre1.Caption " Nombre 1 " & Str(x) End Sub Private Sub Nombre2_Click() y = Val(Nombre.Text) Nombre.Text = "" Nombre2.Caption " Nombre 2 " & Str(y) End Sub Private Sub Nombre3_Click() z = Val(Nombre.Text) Nombre.Text = "" Nombre3.Caption " Nombre 3 " & Str(z) End Sub Private Sub Resultat_Click() Nombre.Text = Str(x + y + z) End Sub