Question

vb二进制码转换问题

问题其实很简单，我用的是VB6.0，我的目的是求0~255这之间数的二进制码，VB里是有一个函数是专门可以转换这个的，这个函数是chr(),比如：我要求48这个数的二进制编码就可以写
chr(48),他所返回的值就是0，反过来说0的二进制编码就是48，我想要的结果是0~255这255个数的二进制码，但是这个函数只能转换0~128这之间的数，129~255这些数转换出来就不对了，麻烦VB高手们帮我看看还有其他什么办法解决这个问题，不胜感激！

Answer 1

你好！

  1、显示函数用chrW，不用chr。

  2、前128个字符可以直接用0-128显示。

  3、后128个字符是扩展ASCII，例如要显示δ，用这个就行chrw（&H03B4），但是括号里面的数据只能通过查表来处理，我试过，大部分都行，个别的由于系统原因无法显示。你把那个值做成一个128的表，到时候查找就是了。

追问

你好，你说的是对的，但是用这种方法每个字符要用两个字节表示，我是想能够一个字符就用一个字节表示（0x00~0xff这255个数据表示），可以吗？

Answer 2

概念错误，48是10进制码。。。

Answer 3

VB转换的ASCII码只用到了低7位，没有扩展部分，

非要用的话，自己弄个函数转换一下也很简单，您说呢

追问

怎么弄啊，帮我弄一下可以吗，或是给点提示也行啊，不胜感激！！！！！！

追答

建立一个字符串数组ch，其中ch[48]="0",依次类推，把对应ASCII码的字符放进对应的数组里，然后建立一个函数CCH，函数的功能就是把函数带来的参数对应的ＡＳＣＩＩ码换算出来，发回原调用处，即可。

Answer 4

"11"的情况与"321"类同，不累述。
假设"十进制数字串"是"2"，那么它的ascii码表示是32h,然后怎么得到数字串"2"的二进制数10b的呢？
"2"送DL,DL就是0011,0010B,屏蔽掉高4位就是0010B
还有就是在 add ax,dx 代码前要一下2段代码，是干什么的？
and dl,0fh
;屏蔽dl高4位
xor dh,dh
;前面的MUL指令会修改DX，下面还要用到dx
;dl已经由传送指令修改，dh还没有修改
;这里就是屏蔽dh，经过这样的处理，才能保证dx的正确
;实际上就是一次零扩展，在支持位扩展的处理器上就可以直接实现
add ax,dx 希望可以帮到你.!