vb语句 函数定义问题

Question

Function IDnum(Text) As Long
Dim c As String
Dim d As Long
c = Text
d = "&H" & c
IDnum = d
End Function是什么意思啊

Answer 1

适当范围内的数字，前缀以 &H，可以直接表示十六进制数字。例如，十六进制表示法的 &H10 代表十进制的 16。

Answer 2

在一个数前面加&H，然后显示出来，好像十六进制形式显示吧。

Answer 3

如果这样，就是3楼说法。
Function IDnum(Text) As String
Dim c As String
Dim d As String
c = Text
d = "&H" & c
IDnum = d
End Function

Answer 4

把Text1中的字符串转换为十六进制数据

Answer 5

把用 字符串表示的十六进制数据 转换成对应的 Long 类型的整数。

Answer 6

Function IDnum(Text as String) As Long 
    IDnum = CLng("&H"+Text)
End Function 搞太复杂了，简化一下。

Answer 7

这样更‘简化’：
Function IDnum(Text As String) As Long
    IDnum = "&H" + Text
End Function

Answer 8

上面的 + 改为 & 更合理（当然用 + 也没错误）