vb6 字符串转为十六进制
VB6 将字符串转换为十六进制可以使用ASCII映射表实现,或使用 ASCII 将字符串转换为十进制数,然后使用 HEX 将其转换为十六进制。
示例:
Sub ConvertStringToHex()
Dim MyString As String
MyString = "Hello World!"
Dim MyStringLength As Integer
MyStringLength = Len(MyString)
Dim MyHexString As String
MyHexString = ""
Dim MyCounter As Integer
For MyCounter = 1 To MyStringLength
MyHexString = MyHexString & " " & Hex(Asc(Mid(MyString, MyCounter, 1)))
Next
' 输出 "48 65 6C 6C 6F 20 57 6F 72 6C 64 21"hex字符串是什么
MsgBox MyHexString
End Sub
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论