我用VB现写一个串口通信的程序,以前有个别人用delphi写的程序,可部分调试,我没用过delphi,对VB也是一般,经调试发现,都是从COM1串口中取数据,源数据是相同的,取出为二进制的
delphi取出的是:0,0,177,8,74,0,85,170,69,67,17,0,77,24……
VB取出的是 :177,8,74,85,170,69,67,17,77,24,93,69……
好像VB中的0都丢失了,是不是我那里设置有问题
With MSComm1
.CommPort = Int(Comm1Port)
.Settings = "115200,N,8,1"
.InBufferSize = 500
.OutBufferSize = 2
.InputMode = comInputModeBinary
.InputLen = 0
.SThreshold = 1
.InBufferCount = 0
.OutBufferCount = 0
MaxW = -99
.RThreshold = 1
End With再说一点吧,写的是读取一个刷卡终端并解析的程序,里面有数字、汉字,还有一些压缩了的图片数据,现在我能正确得到数字与文字信息,但是图片的那些数据不能正确解压,对比delphi程序读出的数据,VB读出的数据要小一些
delphi取出的是:0,0,177,8,74,0,85,170,69,67,17,0,77,24……
VB取出的是 :177,8,74,85,170,69,67,17,77,24,93,69……
好像VB中的0都丢失了,是不是我那里设置有问题
With MSComm1
.CommPort = Int(Comm1Port)
.Settings = "115200,N,8,1"
.InBufferSize = 500
.OutBufferSize = 2
.InputMode = comInputModeBinary
.InputLen = 0
.SThreshold = 1
.InBufferCount = 0
.OutBufferCount = 0
MaxW = -99
.RThreshold = 1
End With再说一点吧,写的是读取一个刷卡终端并解析的程序,里面有数字、汉字,还有一些压缩了的图片数据,现在我能正确得到数字与文字信息,但是图片的那些数据不能正确解压,对比delphi程序读出的数据,VB读出的数据要小一些
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货