bonjour,
j'ai un bouton qui se compose comme ci-dessous et qui remplisse une textbox qui je choisie.
Private Sub bt1_Click()
If box Then
Me.Textquant.Text = Me.Textquant.Text + "1"
Else
Me.Textcat.Text = Me.Textcat.Text + "1"
End If
End Sub
par contre j'aimerai rajouter une textbox de plus, je met donc :
Private Sub bt1_Click()
If box Then
Me.Textquant.Text = Me.Textquant.Text + "1"
Else
Me.Textcat.Text = Me.Textcat.Text + "1"
Else
Me.Textrecu.Text = Me.Textrecu.Text + "1"
End If
End Sub
mais j'ai une message erreur
quelqu'un peut'il de dire ou est mon erreur
merci
j'ai un bouton qui se compose comme ci-dessous et qui remplisse une textbox qui je choisie.
Private Sub bt1_Click()
If box Then
Me.Textquant.Text = Me.Textquant.Text + "1"
Else
Me.Textcat.Text = Me.Textcat.Text + "1"
End If
End Sub
par contre j'aimerai rajouter une textbox de plus, je met donc :
Private Sub bt1_Click()
If box Then
Me.Textquant.Text = Me.Textquant.Text + "1"
Else
Me.Textcat.Text = Me.Textcat.Text + "1"
Else
Me.Textrecu.Text = Me.Textrecu.Text + "1"
End If
End Sub
mais j'ai une message erreur
quelqu'un peut'il de dire ou est mon erreur
merci