VB String nach Hex String umwandeln

PeterM Gast #3179128
Lesenswert?
• ▲
▼ 
Hallo,

ich versuche einen String in einen Hex String umzuwandeln.
z.B.

String = "Hallo"

sollte in

HexString = "48616c6c6f"

umgewandelt werden.

mit dem hier oder auf diese Art bekomme ich es nicht hin:

        For i = 0 To strinh.Length - 1
            hexstring = hexstring & Hex(s1(i))
        Next

oder auch mit ToString klappt es leider nicht, hat jemand eine idee?
Antwort Zitieren Bearbeiten Thread verschieben Thread sperren Anmeldepflicht aktivieren Anpinnen Thread löschen Thread mit anderem zusammenführen Beitrag melden
karadur Gast #3179958
Lesenswert?
• ▲
▼ 
Hallo

war noch ein Fehler drin.

in VB6 geht das hier:
Private Sub Command1_Click()
Dim lang, i As Integer

    lang = Len(Text2.Text)
    For i = 1 To lang
         Text1.Text = Text1.Text + Hex(Asc(Mid(Text2.Text, i, 1)))
    Next i

End Sub
Antwort Zitieren Bearbeiten Löschen Beitrag melden
Thread beobachten

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

Bestehender Account

oder

Mit Google-Account einloggen

Noch kein Account?

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren