[Débutant] Résultat d'un bouton

[ludoak]

Bonjour, je suis débutant et j'aimerai une aide.
j'aimerai creer un petit logiciel qui lorsque je clic sur un bouton (EX: le 1) il s'affiche 1 fois si je clic 2 fois il s'affiche 2 fois ect......

merci pour votre aide

bonne soirée

[Philippe JOCHMANS]

Bonjour

Merci d'être plus précis :

Ce bouton est dans un Userform ? Sur une feuille ?
Où doit s'afficher la donnée ? Dans une cellule, une zone de texte ?

Philippe

[ludoak]

Bonjour, depuis quelques semaines je recherche sur le net un moyen de creer un bouton qui permet d'envoyer le nombre de fois que je click dessus vers textbox.
ex : je click sur Bouton 1 et le resultat sur une textbox =1 puis 2,3,4 ect...
si c'est pas clair regardez le logiciel sur uploaded

http://ul.to/scv82ii6

merci de votre aide

[casefayere]

Bonsoir,
sans savoir ce que tu recherches exactement, en brut à ta lecture, j'ai envie de te proposer simplement ce code, (je n'ai pas été télécharger ton fichier)

Code :

1
2
3
Private Sub CommandButton1_Click()
textbox1 = textbox1 + 1
End Sub

mais ça m'étonnerait que ta demande se situe uniquement là

[ludoak]

Bonsoir merci votre réponse mais visual studio me dit

l'operateur + n'est pas défini pour les types system.windows.form.textbox et integer

[Philippe JOCHMANS]

Re

Tu es en VB.net et non en VBA, je déplace le sujet.

Philippe

[ludoak]

Désolé je suis une chevre j'essaye de m'initier

[StringBuilder]

C'est quand même pas bien compliqué...

Tu crées une variable "nbclicks" en tant que membre de ta form.

Sur le onclick du bouton :

Code :

1
2
 
TextBox1.Text = (++nbclicks).ToString();

Ça va quand même pas chercher loin...

C'est un TP de cours préparatoire ou de grande section ?

[Ascendris]

Envoyé par casefayere

Bonsoir,
sans savoir ce que tu recherches exactement, en brut à ta lecture, j'ai envie de te proposer simplement ce code, (je n'ai pas été télécharger ton fichier)

Code :

mais ça m'étonnerait que ta demande se situe uniquement là

Ça serait mieux si tu avec un "&" pour une string

Code :

1
2
3
4
Private Sub CommandButton1_Click()
intNbr = intNbr + 1
textbox1 = textbox1 & intNbr 
End Sub