如果你的十六进制数据是一个字符型的
如 "CD"
这样转换
S="CD"
Print Clng("&H" & S)
如果是数值型的,直接使用就行了
Public Function Hex2Dec(s As String) As Long
n = Len(s)
For i = n To 1 Step -1
Hex2Dec = Hex2Dec * 16 + Val(Mid(s, i, 1))
Next i
End Function
内容全部来源于网络收集，如有侵权，请联系网站删除!
QQ：24596024