Convertion d'un tableau en chaine de caracteres
Résolu
greg2403
Messages postés
2
Date d'inscription
mercredi 1 juillet 2009
Statut
Membre
Dernière intervention
2 juillet 2009
-
1 juil. 2009 à 12:53
cs_ghuysmans99 Messages postés 3982 Date d'inscription jeudi 14 juillet 2005 Statut Membre Dernière intervention 30 juin 2013 - 1 juil. 2009 à 19:14
cs_ghuysmans99 Messages postés 3982 Date d'inscription jeudi 14 juillet 2005 Statut Membre Dernière intervention 30 juin 2013 - 1 juil. 2009 à 19:14
1 réponse
cs_ghuysmans99
Messages postés
3982
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
16
1 juil. 2009 à 19:14
1 juil. 2009 à 19:14
Obtenir une chaine genre 1,2,3,4,5 ?
Facile :
Dim monTableau(15) As Byte
Dim i As Integer
Dim S As String
Randomize
For i = 0 To Ubound(monTableau)
monTableau(i) = Int(Rnd*255) '// j'hésite entre 255 et 254, faudrait vérifier ...
S = S & CStr(monTableau(i)) & ","
Next i
S = Left(S,Len(S)-1)
MsgBox S
Facile :
Dim monTableau(15) As Byte
Dim i As Integer
Dim S As String
Randomize
For i = 0 To Ubound(monTableau)
monTableau(i) = Int(Rnd*255) '// j'hésite entre 255 et 254, faudrait vérifier ...
S = S & CStr(monTableau(i)) & ","
Next i
S = Left(S,Len(S)-1)
MsgBox S
