Hur gör man om string till HEX? Detta funkar inte; Det finns ju inget standardsätt att säga hur hexkoden ska se ut. Om du vill ha "03A2..." så kan du köra en loop och få fram det med Hex(Asc(Mid$(DinSträng, i, 1))) Du kan konvertera et streng till en bytearray. Så slipper du några funktionsanrop:Göra om string till HEX.
myHEX = Hex("text")
eftersom denna funktion endast funkar med nummer.Sv: Göra om string till HEX.
Sv: Göra om string till HEX.
<code>
Dim Data() As Byte
Dim Text As String
Dim Index As Long
Dim strResult As String
Text = "Hello world!"
Data = StrConv(Text, vbFromUnicode)
For Index = 0 To UBound(Data)
strResult = strResult & Right("00" & Hex(Data(Index)), 2)
Next
Debug.Print strResult
</code>