Incrementer des lettres

Résolu
cs_lhomme Messages postés 27 Date d'inscription lundi 7 juin 2004 Statut Membre Dernière intervention 21 juillet 2004 - 14 juil. 2004 à 09:10
Nix Messages postés 831 Date d'inscription samedi 15 mai 1999 Statut Membre Dernière intervention 18 juillet 2009 - 14 juil. 2004 à 14:54
bonjour,

je cherche une fonction pour incrementer des lettres!

passer de a à b à c à d ........

Y a til une fonction en vb o u faut il la programmer

Merci

2 réponses

ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 26
14 juil. 2004 à 10:31
salut

il faut faire qqch dans le genre de :

dim c as byte
c = 65 'A
msgbox chr$(c) 'A
c=c+1
msgbox chr$(c) 'B
...

ou c = asc("A")
...

voilà

ShareVB
3
Nix Messages postés 831 Date d'inscription samedi 15 mai 1999 Statut Membre Dernière intervention 18 juillet 2009
14 juil. 2004 à 14:54
Si tu veux faire de A à Z, voilà comment faire

' En VB6
Dim i as integer
For i =0 to 25
lettre=chr(i+65)
next

' En VB.NET
For i as integer = 0 to 25
lettre=chr(i+65)
Next

A++

Nix :-p

[MVP VB, VB .NET ASP .NET]
Membre fondateur de Developers Association
3
Rejoignez-nous