aide sur modif bouton

[angoul]

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

 

[skoobi]

Re : aide sur modif bouton

Bonjour,

Sûrement une erreur de syntaxe dans le nom du textbox que tu sites.
Mais sans le fichier...

 

[Pierrot93]

Re : aide sur modif bouton

Bonjour Angoul, Skoobi

aarf 2 "else" dans une instruction "if" cela doit poser problème .... F1 sur le mot "if" t'en dira plus sur les synthaxes possibles, entre autre peut être utiliser "Elseif", mais comme je vois pas trop ou tu veux en venir...

bon après midi
@+