Incrémenter une chaine automatiquement

Résolu
LittleTab Messages postés 25 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 14 mars 2006 - 7 juin 2005 à 13:03
LittleTab Messages postés 25 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 14 mars 2006 - 7 juin 2005 à 13:23
Bonjour,
je me pose une question qui à l'air toute bête mais je vois pas comment faire.
Imaginez la chaine de caractère "A" et je voudrais par exemple quand on clique sur un bouton qu'elle s'incrémente en suivant les lettres de l'alphabet, exemple :
J'ai "A", je clique sur le bouton, du coup j'ai "B", je reclique sur le bouton, j'ai "C" etc...
Donc si quelqu'un pouvait me filer un ptit coup de main merci beaucoup !

2 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
7 juin 2005 à 13:17
Private Sub Command1_Click()

Dim n As Integer

n = Asc(Command1.Caption) + 1

If n 129 Then n 32

Command1.Caption = Chr$(n)

End Sub


Daniel
3
LittleTab Messages postés 25 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 14 mars 2006
7 juin 2005 à 13:23
Merci !!!!
0
Rejoignez-nous