精华内容
下载资源
问答
  • 二进制十进制转换VB函数 '返回二进制数对应的十进制数值
  • 十进制二进制换算。vb版本

    千次阅读 2019-01-16 12:43:18
    vb现在都快绝版了吧。。 哈哈,但是我现在的工作用的...'十进制装换为二进制 '参数dec十进制的数,BinLen换算的二进制位数 Public Function DecToBin(dec As Double, BinLen As Byte) As String Dim binStr As...

    vb现在都快绝版了吧。。
    哈哈,但是我现在的工作用的就是vb。
    所以把这个分享出来。
    十进制和二进制换算
    还有个二进制小数部分换算成十进制小数部分

    '十进制装换为二进制
    '参数dec十进制的数,BinLen换算的二进制位数
    Public Function DecToBin(dec As Double, BinLen As Byte) As String
        
        Dim binStr As String
        Dim a As Double
        Dim i As Integer
        
        Do While dec <> 0
            a = dec Mod 2
            binStr = a & binStr
            dec = dec \ 2
        Loop
        
        For i = 1 To 32 - Len(binStr)
            binStr = "0" & binStr
        Next
        DecToBin = binStr
    End Function
    
    
    '二进制换算为十进制
    '参数Bin二进制的数
    Public Function BinToDec(Bin As String) As Double
        Dim i As Integer
        Dim s As Integer
        
        s = Len(Bin)
        
        Dim decStr As Double
        
        For i = 1 To s
          decStr = decStr + Val(Mid(Bin, i, 1)) * 2 ^ (s - i)
        Next i
        
        
        BinToDec = decStr
        
    End Function
    
    '小数二进制换算十进制
    '参数Bin 小数部分二进制数。换算出来是十进制的小数部分
    Public Function dBinToDec(Bin As String) As Double
        Dim i As Integer
        Dim s As Integer
        
        s = Len(Bin)
        Dim decStr As Double
        
        For i = 1 To s
          decStr = decStr + Val(Mid(Bin, i, 1)) * 2 ^ (-i)
        Next i
        
        dBinToDec = decStr
        
    End Function
    
    展开全文
  • 本文主要介绍的是VB十进制,八进制,十六进制,二进制相互转换大全
  • VB十进制转换为二进制、八进制、十六进制。 来源网络
  • 在.NET Framework中,System.Convert类中的ToString方法和ToInt32(ToInt64)方法都可以方便的实现各种进制间的相互转换。...即可以将十进制整数转换二进制、八进制、十进制(无实际意义)或十...

    在.NET Framework中,System.Convert类中的ToString方法和ToInt32(ToInt64)方法都可以方便的实现各种进制间的相互转换。

    1、Convert .ToString 方法

    Convert .ToString 方法可以将整数值转换为其指定基数(必须是 2、8、10 或 16)的等效字符串表示形式。即可以将十进制整数转换成二进制、八进制、十进制(无实际意义)或十六进制数字的字符串。
    Convert .ToString(value,toBase)
    参数:value——整型,要转换的整数;toBase—— System .Int32 ,返回值的基数,必须是 2、8、10 或 16。
    返回值:System .String ,以 toBase 为基的 value 的字符串表示形式。
    如:

            Dim int As Integer = 256
            '十进制转二进制
            Dim str2 As String = Convert.ToString(int, 2)
            '十进制转八进制
            Dim str8 As String = Convert.ToString(int, 8)
            '十进制转十进制
            Dim str10 As String = Convert.ToString(int, 10)
            '十进制转十六进制
            Dim str16 As String = Convert.ToString(int, 16)
            Console.WriteLine("十进制转二进制:" & str2)
            Console.WriteLine("十进制转八进制:" & str8)
            Console.WriteLine("十进制转十进制:" & str10)
            Console.WriteLine("十进制转十六进制:" & str16)
    

    测试结果如图:
    在这里插入图片描述

    2、Convert .ToInt32(ToInt64) 方法

    将指定基数的数字的字符串表示形式转换为等效的整数。即可以将二进制、八进制、十进制(无实际意义)或十六进制整数的字符串表示形式转换为十进制的数字(整型)。
    Convert .ToUInt64(value,fromBase)
    参数:value—— System .String ,包含要转换的数字的字符串;fromBase——System .Int32 ,value 中数字的基数,它必须是 2、8、10 或 16。
    返回值:整型,与 value 中数字等效的 整数,如果 value 为 Nothing,则为 0(零)。
    如:

            '二进制
            Dim str2 As String = "100000000"
            '八进制
            Dim str8 As String = "400"
            '十六进制
            Dim str16 As String = "100"
    
            '二进制转十进制
            Dim int2 As Integer = Convert.ToInt32(str2, 2)
            '八进制转十进制
            Dim int8 As Integer = Convert.ToInt32(str8, 8)
            '十六进制转十进制
            Dim int16 As Integer = Convert.ToInt32(str16, 16)
    

    3、二进制、八进制、十进制或十六进制间任意互转(输出字符串)

    先把字符串转换成十进制数字,再把数字转换成其他进制的字符串。

        Sub Main()
            '二进制
            Dim str2 As String = "100000000"
            '八进制
            Dim str8 As String = "400"
            '十六进制
            Dim str16 As String = "100"
    
            '二进制转十六进制
            Dim str2to16 As String = ConvertString(str2, 2, 16)
            '八进制转十六进制
            Dim str8to16 As String = ConvertString(str8, 8, 16)
            '十六进制转二进制
            Dim str16to2 As String = ConvertString(str16, 16, 2)
        End Sub
        ''' <summary>
        ''' 进制转换
        ''' </summary>
        ''' <param name="value">二进制、八进制、十进制或十六进制整数的字符串表示形式</param>
        ''' <param name="fromBase">与value值中的相对应的基数(2、8、10或16)</param>
        ''' <param name="toBase">要转换成的进制基数(2、8、10或16)</param>
        ''' <returns></returns>
        Private Function ConvertString(ByVal value As String, ByVal fromBase As Int32, ByVal toBase As Int32) As String
            Dim intValue As Integer = Convert.ToInt32(value, fromBase)
    
            Return Convert.ToString(intValue, toBase)
        End Function
    

    4、其他进制转换方法

    Object.ToString方法或String.Format方法可以将十进制整数转换成十六进制的数字字符串表现形式,但没有提供其他进制的转换。
    如:

            Dim int As Integer = 256
            Dim strS As String = int.ToString("x")
            Dim strF As String = String.Format("{0:x}", int)
    

    5、进制基础知识

    比如十进制的15,其二进制为1111,八进制为17,而16进制为F,各种进制之间是如何转换的呢?

    (1)二进制、八进制、十六进制转十进制

    进制转换
    可见,在十进制中,每一位表示10的幂,要知道十进制位所代表的具体数字,可以将相应数字乘以10的幂,然后把结果相加。
    按照同样的方法,二进制中,每一位表示2的幂,则应将数字乘以2的幂,然后把结果相加即可得到相应的十进制数。
    依此类推,八进制和十六进制都可以按此方法转换为十进制。

    (2)十进制转二进制、八进制、十六进制

    方法:除相应进制的基数(如二进制的基数为2、八进制的基数为8、十六进制的基数为16)取余法,即每次将整数部分除以基数,余数为该位权上的数,而商继续除以基数,余数又为上一个位权上的数,这个步骤一直持续下去,直到商为0为止,最后读数时候,从最后一个余数读起,一直到最前面的一个余数。
    例:将十进制的(15)转换为二进制的步骤如下:

    1. 将商15除以2,商7余数为1;
    2. 将商7除以2,商3余数为1;
    3. 将商3除以2,商1余数为1;
    4. 将商1除以2,商0余数为1;
    5. 读数,读数字从最后的余数向前读,1111。

    将十进制的(15)转换为八进制的步骤如下:
    1、 将商15除以8,商1余数为7;
    2、将商1除以8,商0余数为1;
    3、 读数,读数字从最后的余数向前读,17。

    将十进制的(15)转换为十六进制的步骤如下:
    1、 将商15除以16,商0余数为15;
    2、读数,读数字从最后的余数向前读,15,十六进制用字母F表示。

    展开全文
  • VB进制转换程序,可进行以下四种进制相互转换:二进制、四进制、十六进制、十进制,界面简洁,操作方便,示例演示截图如图所示。
  • VB源程序 十进制二进制转换
  • 本源码演示vb6.0在十进制二进制、八进制、十六进制等多种进制间的转换,同时还可进行十进制数分解,使用时,只需在右侧任意一个方框中输入需要转换的数字,点击“确定”按钮即可实现转换转换记录会显示在左侧的...
  • vb题将十进制正整数转换为二进制.txt
  • 在IFIX中VB十进制八进制十六进制二进制转换代码
  • vb进制转换代码.pdf

    2020-03-01 13:56:15
    VB VVBB 各种进制相互转换大全 ' 用途将十进制转化为二进制 ' 输入Dec(十进制数) ' 输入数据类型Long ' 输出DEC_to_BIN(二进制数) ' 输出数据类型String ' 输入的最大数2147483647,输出最大数...
  • 2进制和10进制转换

    2018-09-24 21:59:48
    VB代码,2进制和10进制转换VB有专门的API函数CopyMemory能处理2-10进制浮点数转换和10-2进制浮点数转换。 下列代码演示了10进制Single(单精度浮点型转为16进制字符显示的浮点数和其相反运算:
  • Excel列号A~Z, AA~ZZ, AAA~ZZZ…… 利用Matlab将十进制数字转换为Excel列号的十六进制
  • 十进制转换二进制 void conversion(){ InitStack(S); scanf(“%d”,n); while(N){ Push(S,n%2) n=n/2; } while(!StackEmpty(S)){ Pop(S,e); printf(“%d”,e); } }//conversion

    十进制转换成二进制

    void conversion(){

    InitStack(S);

    scanf(“%d”,n);

    while(N){

    Push(S,n%2)

    n=n/2;

    }

    while(!StackEmpty(S)){

    Pop(S,e);

    printf(“%d”,e);

    }

    }//conversion

    展开全文
  • vb 二进制十进制代码 不懂如何转换,求详细的过程。大神求带,大神求带,大神求带,大神求带,大神求带,
  • 使用VB编写的进制转换器,支持32位位宽数据的操作并具有以下功能: 1. 十进制 十六进制 二进制 互转 2. 左移 右移操作 (新增功能) 3. 连续地与操作, 或操作, 异或操作 (新增功能) 4. 统计结果数值中1的个数用与...
  • vb做界面的二进制计算器。可以自己在写上十六进制和八进制转换
  • vb 十进制二进制

    千次阅读 2016-04-28 17:42:59
    vb 十进制二进制
    vb 十进制转二进制
    展开全文
  • 模块包含了下面的各种转换二进制十进制二进制转化八进制二进制转化十六进制 八进制转化为十进制八进制转化为二进制八进制转化十六进制 十进制二进制十进制转化八进制十进制转化十六进制 十六进制...
  • 二进制十进制 二进制转化八进制 二进制转化十六进制 八进制转化为十进制 八进制转化为二进制 八进制转化十六进制 十进制二进制 十进制转化八进制 十进制转化十六进制 十六进制转化为二...
  • MATLAB中负数8位二进制与10进制之间的转换
  • vb十二进制

    2014-10-25 17:42:14
    vb直接把十进制的数字转换二进制。这是本人第一个上传的文件,请大家赏个脸下载,谢谢!
  • vb进制转换代码.doc

    2020-04-23 23:48:21
    VB 各种进制相互转换大全 ' 用途将十进制转化为二进制 ' 输入Dec(十进制数) ' 输入数据类型Long ' 输出DEC_to_BIN(二进制数) ' 输出数据类型String ' 输入的最大数2147483647,输出最大数...Public Function DEC_to_...
  • vb.net进制相互转换.rar

    2020-07-09 16:34:34
    vb.net进制相互转换 1. Private Sub Button2_Click(sender As Object, e As EventArgs) Handles 2.Button2.Click 3. Dim i1 As String 4. i1 = TextBox3.Text 5. TextBox4.Text = Convert.ToInt32(i1, 2) End ...
  • 摘要:VB源码,其它类别,进制转换 本程序实现常见的一些进制间的互相转换,可完成二进制转换十进制、十六进制与十进制相互转换、十六进制与二进制互相转换等,有些在转换前还需要加上判断,以确定是否是一个合法的...
  • 我是一名vb.net初学者,现在正在尝试做一个十进制转换二进制补码的控制台程序 ’十进制转二进制的步骤是将十进制数除以二然直到商为0,然后反向读取余数。请问要怎么获取余数呢? ’如何让程序自动判断输入...
  • VB 进制转换程序

    2013-06-02 08:48:37
    VB 进制转换程序 ,八,,十六 进制相互转换
  • VB二进制(字符串形式)转化为十进制,将十进制转化为二进制(字符串形式),二进制十进制互转函数,简练高效。
  • 十进制转换二进制计算机是采用二进制存储的,计算机的二进制编码方式也分为原码,反码,补码方法。这是一个把十进制数字转换到它的二进制原码的算法,希望能给大家一些启发吧!这个算法我是用VB6写的,其中用到了...
  • 进制转换,有VB源码,共两个函数,可以转换小数。

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 5,622
精华内容 2,248
关键字:

vb十进制转换为二进制