Bonjour,

J'ai un peu de mal avec l'héxadécimal.

Je récupere une chaine héxa qui contient : 42-6F-6E-6A-6F-75-72

je pensais naivement que je pouvais transformer simplement tout cela en une chaine ascii mais je n'y parvient pas.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Dim chaine_hexa As String = BitConverter.ToString(mon_tableau, 32, 16) ' on récupere la chaine hexa (16 octects)
 
Dim nbre_caractere As Integer = 0
Dim chaine_ascii As String = ""
Dim caractere_hexa() As String = Split(chaine_hexa, "-") 'on sépare chaque code hexa
 
For nbre_caractere = 0 To (caractere_hexa.Length - 1) 'pour chaque caractere trouvé
chaine_ascii = chaine_ascii & Asc(caractere_hexa(nbre_caractere))
Next
Cela ne fonctionne pas, la fonction ASC ne semble pas être utilisable pour cela.

Merci pour votre aide