-> Hier kostenlos registrieren
ich habe folgendes Problem: Wandlung eines ASCII Zeichens in eine Hex-Zahl.
Generell funktioniert das folgende:
V2 ergibt die Dezimalwerte, V3 die Hexwerte. Hat aber ein Problem: bei einem Doppelpunkt steht in V3 statt "3A" "00" drin. Andere Zeichen (wie z.B. ";" ergeben erwartungsgemäße Ergebnisse ("3B"). Wird das "Format" entfernt scheint's zu funktionieren.
also:
Was mache ich (bzw. Herr Gates) falsch?
Generell funktioniert das folgende:
Code:
For i = 1 To Len(Text1.Text)
V2 = V2 & Format(Asc(Mid(Text1.Text, i, 1)), "000") & ","
V3 = V3 & " " & Format(Hex(Asc(Mid(Text1.Text, i, 1))), "00") & ","
Next
also:
Code:
V3 = V3 & " " & Hex(Asc(Mid(Text1.Text, i, 1))) & ","