正文
关于vb.nethex函数的信息
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
vb.net 字符串，16进制间转换(求代码)
把字符串“12341168C5B7”转换为16进制数存为string型
用shuzi=Convert.ToInt32("12341168C5B7",16)
就ok了。
反之用 shuzi.ToString("X")就行了。
给分！！！
12341168C5B7转换成10进制数就是20014839678391。。
而int32的最大值为2,147,483,647。。所以产生错误。
所以要用int64，它的最大值为9,223,372,036,854,775,807。也就是16位十六进制数0X7FFFFFFFFFFFFFFF。
难道还有比F靠后的数？？？？？？
相关问答
Q1: VB.NET，八/十六进制转十进制的函数，怎么转?
'此函数用于十进制到二进制
Private Function Bin(Number As Long) As Long
Dim Div_value As String
Do
Div_value = (Number Mod 2) Div_value
Number = Int(Number / 2)
Loop Until Number 2
Bin = Number Div_value
End Function
'此函数用于二进制到十进制
Private Function value_Bin(Number As Long) As Long
Dim Temp_value As Long, Cyc As Long
For Cyc = 0 To Len(Str(Number))
If Cyc = Len(Str(Number)) Then
value_Bin = Temp_value + Val(Mid(Str(Number), Cyc, 1))
Exit For
End If
If Cyc 0 Then Temp_value = (Temp_value + Val(Mid(Str(Number), Cyc, 1))) * 2
Next Cyc
End Function
'====写入以上函数后转值操作：
'十进制到十六进制：Hex(十进制数值)
'十进制到八进制：Oct(十进制数值)
'十进制到二进制：Bin(十进制数值)
'二进制到十进制：value_Bin(二进制数值)
'八进制到十进制：Val("O" 八进制数值)
'十六进制到十进制：Val("H" 十六进制数值)
比如
msgbox DEC_to_BIN(10)
就会返回一个10转换为十进制后的结果
或者简单点就用
VB自带函数：
十进制转八进制：Oct(num)
十六进制转八进制：oct("H" num)
十进制转十六进制：hex(num)
八进制转十六进制：hex("O" num)
十六进制转换为十进制
Dim str As String
str = Text2.Text
Text10.Text = CLng("H" str)
Q2: VB的中HEX函数
汉字“人”的asc码是一个大于32767的值，所以用integer返回就是一个负数：-14133
C8CB是一个十六进制的补码，补码的意思就是高字节如果为1，那么就是负数。
根据integer的范围：-14133，其实对应的是 -14133 + 65536 = 51403 = C8CB，正好就是那个hex返回的数值，所以，这两个值是一样的。
如果不理解，看看补码的概念吧，是二进制上的一个概念。
Asc 函数
返回一个 Integer，代表字符串中首字母的字符代码。
语法
Asc(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符，则会产生运行时错误。
说明
在非 DBCS 系统下，返回值范围为 0 – 255 。在 DBCS 系统下，则为 -32768 – 32767。
注意 AscB 函数作用于包含在字符串中的字节数据，AscB 返回第一个字节的字符代码，而非字符的字符代码。AscW 函数返回 Unicode 字符代码，若平台不支持 Unicode，则与 Asc 函数功能相同。
-----------------------------------------------
Hex 函数
返回代表十六进制数值的 String。
语法
Hex(number)
必要的 number 参数为任何有效的数值表达式或字符串表达式。
说明
如果 number 还不是一个整数，那么在执行前会先被四舍五入成最接近的整数。
如果 number 为 所得为
Null Null
Empty 零 (0)
任何其他的数字 最多可到八个十六进制字符。
适当范围内的数字，前缀以 H，可以直接表示十六进制数字。例如，十六进制表示法的 H10 代表十进制的 16。
Q3: VB中 HEX$是什么意思
Hex 函数可以将一个数值转换为16进制vb.nethex函数的字符串String类型。
语法vb.nethex函数：Hex(number)
实例vb.nethex函数：
Msgbox Hex(3) '3
Msgbox Hex(10) 'A
Msgbox Hex(123) '7B
Msgbox Hex(H123) '123
Q4: vb.net 把十进制数转成十六进制数的函数有哪些？
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MsgBox(DEC_to_HEX(255))
End Sub
Public Function DEC_to_HEX(ByVal Dec As Long) As String
Dim a As String
DEC_to_HEX = ""
Do While Dec 0
a = CStr(Dec Mod 16)
Select Case a
Case "10" : a = "A"
Case "11" : a = "B"
Case "12" : a = "C"
Case "13" : a = "D"
Case "14" : a = "E"
Case "15" : a = "F"
End Select
DEC_to_HEX = a DEC_to_HEX
Dec = Dec \ 16
Loop
End Function
关于vb.nethex函数和的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。
