发表于:2005/9/30 19:29:00
#0楼
我用MSCOMM控件进行232通信
Dim InData as string
Dim Volume as Double
InData = MSComm1.input
If Left(InData, 1) = Chr$(2) And Left(Right(InData, 2), 1) = Chr$(3) Then
'判断接收 数据的头和尾。
Volume = Val(Mid(InData, 3, 8)) '数值转换,Volume为读到的数据
Endif
为什么我在InData中看到的是“????”,而在Volume中却什么都接收不到?
是不是InData,Volume的数据类型错误?错误的话,应该选什么数据类型?