我用VB做了串口通信程序,接收的数据如果长为一则是握手信号或结束信号，长为21为数据信号，程序运行正常后，把里面的Msgbox语句删除，数据长度的检测就出错了，不知道为什么？代码如下： Private Sub MSComm1_OnComm() Dim Arr() As Byte Select Case MSComm1.CommEvent Case comEvReceive '...有接受事件发生 bufcount = MSComm1.InBufferCount MsgBox (bufcount) '此句拿掉后则后面的Ubound(Arr)值不正确 Arr = MSComm1.Input If ((UBound(Arr) <> 0) And (UBound(Arr) <> 21)) Then MsgBox ("wrong...") Exit Sub
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？ dim f as integer dim b() as byte dim s as string dim L as long f=freefile() open "abc.xml" for binary access read as #f ......
