vb语句 函数定义问题
Function IDnum(Text) As LongDim c As String
Dim d As Long
c = Text
d = "&H" & c
IDnum = d
End Function
是什么意思啊 --------------------编程问答-------------------- 把16进制转换成数字。 --------------------编程问答-------------------- 适当范围内的数字，前缀以 &H，可以直接表示十六进制数字。例如，十六进制表示法的 &H10 代表十进制的 16。
--------------------编程问答-------------------- 在一个数前面加&H，然后显示出来，好像十六进制形式显示吧。 --------------------编程问答-------------------- 应该是一楼说易做图确。 --------------------编程问答-------------------- 如果这样，就是3楼说法。
Function IDnum(Text) As String
Dim c As String
Dim d As String
c = Text
d = "&H" & c
IDnum = d
End Function
--------------------编程问答-------------------- 把Text1中的字符串转换为十六进制数据 --------------------编程问答-------------------- 巫师答案是正确的，一般做字符分析的时候用的比较多 --------------------编程问答-------------------- 把用 字符串表示的十六进制数据 转换成对应的 Long 类型的整数。
--------------------编程问答--------------------
Function IDnum(Text as String) As Long
IDnum = CLng("&H"+Text)
End Function
搞太复杂了，简化一下。 --------------------编程问答-------------------- 这样更‘简化’：
Function IDnum(Text As String) As Long
IDnum = "&H" + Text
End Function
--------------------编程问答-------------------- 上面的 + 改为 & 更合理（当然用 + 也没错误）
--------------------编程问答--------------------
顶
补充：VB , 基础类
