10进制转换为16进制：
很简单， 使用现成的HEX函数，返回一个16进制形式的String，例如:
Dim I As Integer
I=255
Hex(I)，返回一个String: "FF"
16进制转换为10进制：
VB是没有现成的转换函数，这是我发现的一个取巧办法，方法是利用"H"和Val函数配合使用转换，例如:
Dim S As String
S="FF"
Val("H" S)，返回一个10进制的Integer: 255
H原本是在编辑模式下输入16进制的常量的方法，没想到Val函数居然可以把它支持到表达式里，
这下省事了....
这个不错哟，顶一下
Being a devil is the same as being a human. We should be kind. If we are kind, we are not a devil, we are a hybrid.
