看流星社区 › 其它编程技术 › vb十六进制转十进制，求vb程序代码。

P8551945 发表于 2014-7-10 09:28:13

vb十六进制转十进制，求vb程序代码。

vb十六进制转十进制，求vb程序代码。

btjily 发表于 2014-7-10 09:28:22

Private   Function   HexToDec(ByVal   strHex   As   String)   As   Long
On   Error   GoTo   ErrorDo
      Dim   Tmp   As   Long
      Dim   s   As   String
      s   =   "&H "   &   strHex
      Tmp   =   Val(s)
      HexToDec   =   Tmp
      Exit   Function
ErrorDo:
      HexToDec   =   -1
End   Function

查看完整版本: vb十六进制转十进制，求vb程序代码。