注册 登录
编程论坛 VB6论坛

VB 端口命令无效,求大神帮助,不胜感激

凉京 发布于 2014-08-16 21:10, 495 次点击
一个与磁强计通信的程序:
只有本站会员才能查看附件,请 登录

计算机设备管理器中端口部分里面COM1是正常的
只有本站会员才能查看附件,请 登录

不知道问题出在哪里,初来乍到,对VB不懂,以前都是用C的,求各位大神帮忙!

[ 本帖最后由 凉京 于 2014-8-16 22:38 编辑 ]
4 回复
#2
fengwdp2014-08-16 21:48
我也是初学者,应该在打开前要设置串口的参数,端口号,波特率等属性吧。
我与单片机的通讯是下面这段,你可以简化下。不对的就得请大虾指教了
程序代码:
    = "3"                                                         ' 设定端口
    MSComm.Settings = "9600,n,8,1"                                               ' 设置波特率,无校验,8位数据位,1位停止位
    MSComm.InBufferSize = 1024                                                  ' 设置接收缓冲区为1024字节
    MSComm.OutBufferSize = 4096                                                 ' 设置发送缓冲区为4096字节
    MSComm.InputMode = comInputModeBinary                                      '采用二进制传输
    MSComm.InBufferCount = 0                                                    ' 清空输入缓冲区
    MSComm.OutBufferCount = 0                                                   ' 清空输出缓冲区
    MSComm.SThreshold = 1                                                       ' 发送缓冲区空触发发送事件
    MSComm.RThreshold = 1                                                       ' 每X个字符到接收缓冲区引起触发接收事件
    MSComm.OutBufferCount = 0                                                   ' 清空发送缓冲区
    MSComm.InBufferCount = 0                                                    ' 滑空接收缓冲
    MSComm.SThreshold = 0 '一旦发送数据就触发OnComm()事件来检测是否返回数据
    MSComm.RThreshold = 1 '接收到1个字节数据就立即触发OnComm()事件
    MSComm.PortOpen = True
#3
凉京2014-08-16 22:08
回复 2 楼 fengwdp
谢谢了,但应该不是这个问题,设置之后,端口未打开的错误还是存在,而且神奇的是一个月前,还是正常的,这一个月什么都没做,回来打开就不正常了,接线也插拔了很多次都不管用,不明白哪里出了毛病,而且串口测试软件显示COM1的串口也是正常的,不懂啊
#4
vbvcr512014-08-18 14:47
如果是硬件问题,用万用表测试一下,发送和接收端子的电压是是否是正常电压。
#5
lichenyin2014-08-27 14:55
用串口调试程序激活一下,即可。
1