版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
不同于上一节的一般数值到字符串的转换
本节谈谈进制间的转换,主要涉及十进制转到二进制、八进制和十六进制以及二进制、八进制和十六进制转到十进制。
之前在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