Sujet : [Vb.Net] Concaténer une chaîne de caractères ???

Salut,

Je dois être vraiment supra débile...mais je n'arrive pas à concaténer une chaîne ! Ca n'est pas la 1ère fois que je me heurte à ce problème (j'ai déjà lutté sur exactement la même chose pendant mes essais avec les conversions base64). Et ça commence à me chauffer !! mad

Voici le bout de code que j'ai :

Dim manufSerialNum As String = ""

Dim myChar, i As Integer
For i = 0 To 7
    ULStat = GetConfig(2, BoardNum, i, 224, myChar)
    manufSerialNum &= Convert.ToChar(myChar).ToString()
Next i

Explications : manufSerialNum est la chaîne que je veux construire. La méthode GetConfig() est une fonction importée d'une dll dont la seule chose à savoir est que le dernier paramètre, myChar, est un entier passé par référence. Cet entier représente un caractère qui est converti à la ligne suivante.

En mode pas à pas, Convert.ToChar(myChar) me renvoie des choses comme "6"c. J'ai donc bien un résultat pour chaque caractère.

Pourquoi alors ma chaine manufSerialNum reste vide ??? Pouuuuuurquoiiii ?? :'( :'( :'(

PS : ca me gave Vb.Net !!!!!!!!!!

-------------------------------
"Keyboard not detected, press a key to continue..."

WWW

Re : [Vb.Net] Concaténer une chaîne de caractères ???

Je précise que j'ai tout essayé comme méthodes :

maChaine += Convert.ToChar(myChar)
maChaine &= Convert.ToChar(myChar)

maChaine = maChaine + Convert.ToChar(myChar)
maChaine = maChaine & Convert.ToChar(myChar)

Dim maChaineTmp As String = Convert.ToChar(myChar)
maChaine = maChaineTmp

J'ai même essayer de passer par la classe StringBuilder.

Résultat : y'a rien qui passe...

-------------------------------
"Keyboard not detected, press a key to continue..."

WWW

Re : [Vb.Net] Concaténer une chaîne de caractères ???

Bien après quelques tests, je suis arrivé à la conclusion suivante : ce n'est pas la concaténation qui pose problème mais l'utilisation de la fonction GetConfig() qui, pour je ne sais quelle raison, et par je ne sais quel moyen me flingue la concaténation yikes.

Ceci fonctionne parfaitement :

Dim manufSerialNum As String = ""

Dim myChar, i As Integer
For i = 0 To 7
    'ULStat = GetConfig(2, BoardNum, i, 224, myChar)
    myChar = 48
    manufSerialNum &= Convert.ToChar(myChar)
Next i
-------------------------------
"Keyboard not detected, press a key to continue..."

WWW