Securité
jeetkune_do
Messages postés
1
Date d'inscription
lundi 2 mai 2005
Statut
Membre
Dernière intervention
3 mai 2005
-
3 mai 2005 à 12:59
econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 - 3 mai 2005 à 13:59
econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 - 3 mai 2005 à 13:59
1 réponse
econs
Messages postés
4030
Date d'inscription
mardi 13 mai 2003
Statut
Membre
Dernière intervention
23 décembre 2008
24
3 mai 2005 à 13:59
3 mai 2005 à 13:59
Dim sTemp As String
Dim tablo() As String
Dim s As String
Dim i As Long
s = "74 101 32 110 101 32 99 111 109 112 114 101 110
100 115 32 112 97 115 32 116 111 110 32 108 97 110 103 97 103 101 46"
tablo = Split(s, " ", , vbTextCompare)
For i = LBound(tablo) To UBound(tablo)
sTemp = sTemp & Chr(tablo(i))
Next i
MsgBox sTemp
Manu
-------------------------------------------
Une question bien posée, c'est une chance de réponse bien adaptée.
Dim tablo() As String
Dim s As String
Dim i As Long
s = "74 101 32 110 101 32 99 111 109 112 114 101 110
100 115 32 112 97 115 32 116 111 110 32 108 97 110 103 97 103 101 46"
tablo = Split(s, " ", , vbTextCompare)
For i = LBound(tablo) To UBound(tablo)
sTemp = sTemp & Chr(tablo(i))
Next i
MsgBox sTemp
Manu
-------------------------------------------
Une question bien posée, c'est une chance de réponse bien adaptée.
