HEX函数怎么用

Question

Private Const DELETE = &HA
Private Sub Command1_Click()
Dim a As Integer
a = DELETE
MsgBox a
End Sub

Answer 1

val("&H" & str(数值))！！！！！！

Answer 2

Dim j As Long
j = 99
j = Hex(j)
MsgBox Val("&H" & CStr(j))
明白了么？

Answer 3

X=Val("&H" & 数值)

Answer 4

Hex函数 返回 返回代表十六进制数值的 String。语法Hex(number)必要的 number 参数为任何有效的数值表达式或字符串表达式。说明如果 number 还不是一个整数，那么在执行前会先被四舍五入成最接近的整数。如果 number 为 所得为 
Null Null 
Empty 零 (0) 
任何其他的数字 最多可到八个十六进制字符。 
适当范围内的数字，前缀以 &H，可以直接表示十六进制数字。例如，十六进制表示法的 &H10 代表十进制的 16。