vb.net 教程 1-6 数据类型：数值数据转换2

不同于上一节的一般数值到字符串的转换

本节谈谈进制间的转换，主要涉及十进制转到二进制、八进制和十六进制以及二进制、八进制和十六进制转到十进制。

之前在vb6中对进制间的转换是比较麻烦的事情，但是vb.net就简单多了，只需要使用到Convert 类，将一个基本数据类型转换为另一个基本数据类型。

看以下代码：

Sub main()
Dim i As Integer
i = 255
Console.WriteLine("十进制转为二进制：" & Convert.ToString(i, 2))
Console.WriteLine("十进制转为八进制：" & Convert.ToString(i, 8))
Console.WriteLine("十进制转为十六进制：" & Convert.ToString(i, 16))

Dim x As String
x = "11111111"
Console.WriteLine("二进制转为十进制：" & Convert.ToInt32(x, 2))
x = "377"
Console.WriteLine("二进制转为十进制：" & Convert.ToInt32(x, 8))
x = "ff"
Console.WriteLine("十六进制转为十进制：" & Convert.ToInt32(x, 16))

Console.ReadKey()
End Sub

运行结果：



使用到的方法：

ToString(value As Integer, toBase As Integer)：

输出字符串，value表示对应的十进制数值，toBase只能是2、8、10或者16，表示进制。

ToInt32 (value As String, fromBase As Integer)：

输出Int32整数，value字符串表示一个二进制、八进制和、十进制或者十六进制的数，fromBase只能是2、8、10或者16，表示进制。

如果使用了不能转换的数据，那么运行时会发生错误。将字符串设为"qff"再按照十六进制转为十进制，由于q不是十六进制的有效数字，所以发生错误：



另外补充2点：

1、format()方法也可以将十进制转为十六进制字符串

Sub main()
Dim i As Integer
i = 255
Console.WriteLine("十进制转为十六进制：" & Format(i, "x"))

Console.ReadKey()
End Sub

但是遗憾的是，不能将十六进制字符串转为十进制整型数值。

2、整型数值也可以直接定义为十六进制形式，常常用于常量的定义：

Private Const FILE_SHARE_READ As Integer = &H1

如下代码：

Dim k As Integer = &H23
Console.WriteLine("k=" & k)

如果定义了一个整型的十六进制数值，那么可以使用format转为十进制的整型数值：

Console.WriteLine("十进制转为十六进制：" & Format(k, "D"))

完整的代码及输出结果：

Sub main()
Dim k As Integer = &H23
Console.WriteLine("k=" & k)

Console.WriteLine("十进制转为十六进制：" & Format(k, "D"))

Console.ReadKey()
End Sub