ASC>128问题尚未解决（VB5）

Question

原因如此：
   你用sendd=sendd=Chr(&H6A) & Chr(&HA6) & Chr(&HEF) & Chr_(&HEF) & Chr(&H48) & Chr(&H30) &Chr(&H29) & Chr_(&H87)
   然后，你用mid(sendd,2,1)看看，原来是&HA6，现在是0.

Answer 1

如果你要用字符串传指令（最好还是用byte），把chr改为chrw,最后接到后，用ascw判断。chr只能用于<128,

Answer 2

别想了，你只能用字节数组，如果你用示波器抓你发送的数字，你会发现他们都被-128，（如果他大于128），我想这个在VB的说明中讲的很详细。
上面的程序你还是只能用我告诉你的方法。
dim a() as byte
dim b
redim a(7)
a(0)=&h6a
a(1)=&ha6
...
a(7)=a(0) and a(1) and a(2)...and a(6)
b=a
mscomm1.output = b
这样一定可以，我这样发过几百个字符都没有错。
而且，也必须这样，你仔细看他的说明。他会告诉你，>128必须用字节数组。