Incrémentation

Question

slt,
En VB;
En ce moment avec cette prog, je mets des valeurs dans une text box en appuyant sur un bouton mais j'aurais voulus en rappuyant sur le bouton mettre dans la case du dessous les informations suivante tel un tableau, il faudrait qu'il s'applique a la suite de ma prog que voici :

Private Sub Command1_Click()
        Form2.Text11.Text = Form2.Text1.Text
        Form2.Text12.Text = Form2.Combo1.Text
        Form2.Text13.Text = Form2.Combo2.Text
        Form2.Text14.Text = Form2.Text2.Text
        Form2.Text15.Text = Form2.Text3.Text
        Form2.Text16.Text = Form2.Text4.Text
End Sub

cs_Jack · Answer

Salut
Pas clair ...
C'est pour quel VB ?  VB6, VBA de Office, VB.Net ?
"mettre dans la case du dessous" Du dessous de quoi ? quelle case ? et tu veux y mettre quoi ?

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Champion du monde de boule de cristal - 2005
Le savoir est la seule mati&#232;re qui s'accro

jpleroisse · Answer

Bonsoir,
Utilise la propri&#233;t&#233; Caption du CommandButton.

Private Sub Command1_Click()
If Command1.Caption = "Valider" Then
     MsgBox "ici ton code"
Command1.Caption "Revalider"
    Form2.Text11.Text = Form2.Text1.Text
        Form2.Text12.Text = Form2.Combo1.Text
        Form2.Text13.Text = Form2.Combo2.Text
        Form2.Text14.Text = Form2.Text2.Text
        Form2.Text15.Text = Form2.Text3.Text
        Form2.Text16.Text = Form2.Text4.Text
    Else
Command1.Caption "Valider"
    MsgBox "ton code ici"
End If
End Sub

Private Sub Form_Load()
Command1.Caption = "Valider"
End Sub

jpleroisse

Si une r&#233;ponse vous convient, cliquez R&#233;ponse Accept&#233;e.

jpleroisse · Answer

Re,
J'ai oubli&#233; le signe = apr&#232;s le caption du commandbutton
jpleroisse

Incrémentation

3 réponses

Discussions similaires