请教各位大哥关于VB的两个问题!

Question

请教各位大哥关于VB的两个问题，恳请不吝赐教：
1、在VB编程中，Val("&HFFFF")返回值为-1，如果让&HFFFF返回值为65535，该怎么做？这可能这需要定义一个没有负数的变量，但VB好像没有类似VC中unsigned这样的关键字吧？那么该怎么实现呢？请教。
2、VB中进行进制转换时，转换为八进制有Oct（）函数，转换为十六进制有Hex（）函数，我怎么在帮助里没有找到转换为二进制的函数？有没有转换为二进制的这样一个函数啊？如果没有的话，那么转换为二进制的话，该怎么实现？
小弟才疏学浅，恳请大哥们指教。衷心感谢！！

Answer 1

楼主，    1. MsgBox CLng("&HFFFF")
    2.
      Public Function huan2(ten As Double) As String
   Dim two As String
   Dim n As Double
   Do Until ten = 0
      n = ten Mod 2
      two = n & two
      ten = ten \ 2
   Loop
  huan2 = two
End Function