串口通讯问题,急盼高手解决!

来源:百度知道 编辑:UC知道 时间:2024/06/14 05:48:42
我想用vba做一个串口采集程序,需要向com1口发送十六进制DD命令开始采集,我的具体做法是:
添加一个 MSComm控件,
然后使用 MSComm1.Output = &HDD 向串口传送dd命令,但是提示无效属性值,第一次做这样的程序,实在是无从下手

望高手帮忙解决!
非常感谢!dcount10的方法可以,不过有点不大明白,我发送的DD,怎么把EE,FF也放在数组里面呢,还有数组大小一定要三个吗?如果我想发送AA关闭设备的话是不是把EE改成AA就行了呢

明白了,现在发送问题解决了,接收数据又出问题了,我用以下代码读取串口的数,串口传递的是一组以03开头的7个byte数据类型的数组,但是运行的时候提示不能给数组赋值

Dim DataInput() As Byte

'读取串口数据
DataInput = MSComm1.Input

非常感谢,现在已经能正常读取了,不过还是有个疑问,串口的数据是7个字节为一组数据,我用DataInput接收的话一次是默认接收7个字节吗?

MSComm1.Output 可以为字符串或者是BYTE数组
Dim Data(2) As Byte
Data(0) = &HDD
Data(1) = &HEE
Data(2) = &HFF
MSComm1.Output = Data

我只是举例说明。。。。。。

提示无效属性值?

是 哪个 的 属性值?

推荐 你看 pdf 电子文档
Visual_Basic与_RS-232_串行通信控制(最新版)

可以下载的
如有需要,可以联系我

祝你顺利,也欢迎交流

MSComm1.Output 可以为字符串或者是BYTE数组
Dim Data(2) As Byte
Data(0) = &HDD
Data(1) = &HEE
Data(2) = &HFF
MSComm1.Output = Data

同意上述说法

MSComm1.Output =val("&H"&"DD" )