zoukankan      html  css  js  c++  java
  • .NET 环境下进制间的转换

    十进制转换为二进制:
            Dim Dec As Integer  '用于存储十制的变量
            Dec = Integer.Parse(txtValue.Text)
            Dim t As Integer
            Dim iArray(50) As Integer '储存二进制序列
            Dim str As String
            While Dec <> 0 '一直整除以二直到商为0
                iArray(t) = (Dec Mod 2)
                Dec = Dec \ 2
                t += 1
            End While
            t -= 1
            While t >= 0 '逆序输出,即为转换后的二进制序列
                str &= iArray(t)
                t -= 1
            End While
            Me.Label1.Text = ""
            Me.Label1.Text = str

    十进制转换为八进制,只需要把上面While循环中的2改为8即可以.

    十进制转换为十六进制:

     Dim Dec As Integer
            Dec = Integer.Parse(txtValue.Text)
            Dim t As Integer
            Dim iArray(50) As String '注意区别于上面的INTEGER类型
            Dim str As String
            While Dec <> 0
                iArray(t) = (Dec Mod 16).ToString("x") '这是转换为十六进制的关键字符转换."x"表示转换为16进制的格式
                Dec = Dec \ 16
                t += 1
            End While
            t -= 1
            While t >= 0
                str &= iArray(t)
                t -= 1
            End While
            Me.Label1.Text = ""
            Me.Label1.Text = str
    >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
    二进制,八进制,十六进制转换为十进制:

    Convert.ToInt32(value, frombase)  'value as string, frombase的取值只能为:2,8,10,16

    这个函数含义是: 把frombase格式的value转换为Int32格式的数值.
    例如:
    二进制转换为十进制:
    txtResult.text=convert.toint32(txtValue.text,2)
    十六进制转换为十进制:
    txtResult.text=convert.toint32(txtValue.text,16)
    八进制转换为十进制:
    txtResult.text=convert.toint32(txtValue.text,8)

  • 相关阅读:
    window.open()参数列表
    感受教育,焦点访谈
    《迷墙》
    锻炼身体
    Great Fire Wall
    今天
    查询重复记录的SQL语句
    Oracle,SQL Server,Access万能数据库通用类!
    经典SQL语句大全
    C#编码规范
  • 原文地址:https://www.cnblogs.com/msnadair/p/829301.html
Copyright © 2011-2022 走看看