请问二进制怎么转化成字符串？

RT 问题点数：20、回复次数：6Top

1 楼huxiangming（老虎）回复于 2002-08-29 23:51:42 得分 5

Str   ?????Top

2 楼paulxj（失而复得）回复于 2002-08-30 00:03:36 得分 0

好像有个函数的，不然就自己做一个，调用一下！  
  呵呵，是个笨办法！Top

3 楼pcfanshome（I like It）回复于 2002-08-30 00:22:35 得分 0

那字符串转成二进制呢？Top

4 楼pcfanshome（I like It）回复于 2002-08-30 02:50:13 得分 0

UPUPUPTop

5 楼zyl910（编程的乐趣在于编程控制硬件，与用图形学实现绚丽效果）回复于 2002-08-30 06:16:34 得分 10

'设LoadBytes为二进制数据  
   
  Dim   BinAndData(1   To   8)   As   Byte  
  Dim   BinStr   As   String*8  
  Dim   OutStr   As   string  
  Dim   I   As   Long,J   As   Long  
  Dim   ArrayMin   As   Long,ArrayMax   As   long  
   
  ArrayMin=LBound(LoadBytes)  
  ArrayMax=UBound(LoadBytes)  
   
  For   I=1   To   8  
          BinAndData(I)=2^(8-I)  
  Next   I  
   
  For   I=ArrayMin   To   ArrayMax  
          For   J=1   To   8  
                  Mid$(BinStr,J,1)=IIf(LoadBytes(I)   And   BinAndData,   "1",   "0")  
          Next   J  
          OutStr=OutStr   +   BinStr   +   "   "  
           
  Next   I  
  Top

6 楼taojm（桃子）回复于 2002-08-30 07:30:00 得分 5

如果有a(0   to   10)二进制数那么先定义一个变量dim   ByteToString   as   String  
  for   i=0   to   10  
  ByteToString   =ByteToString   &chr(a(i)  
  next   i  
  Top

相关问题

• 二进制
• loadbytes
• arraymax
• binanddata
• binstr
• bytetostring
• arraymin
• outstr
• next
• dim

• 帖主：pcfanshome
• huxiangming
• zyl910
• taojm

• Visual Basic类图书
• Visual Basic类源码下载