在vb中怎样提取一个字符的bit位，怎样提取一个字符8位中的前六位？？

目标字符串 = LeftB(字符串, 8)

解决方案 »

  1.   

    目标字符串 = LeftB(字符串, 6)
      

  2.   

    jg = ""
    b = Asc("a")
    For i = 2 To 7
      If (b And 2 ^ i) <> 0 Then
        jg = "1" + jg
      Else
        jg = "0" + jg
      End If
    Next i
    Me.Caption = jg
      

  3.   

    目标字符串 = LeftB(字符串, 6)
    这里好象是提取，6个字节的内容呀
      

  4.   

    位运算啊！=(Asc("A") and &HFC)\4
      

  5.   

    先用StrConv把字符串转为ANSI+DBCS的Byte数组
    再用位运算合并就行了
      

  6.   

    zyl910(910：分儿，我来了！) 你好
    能不能给出一个举例，谢谢