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 = "22222111"
        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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!