原本是这样的
Private Sub Command1_Click() 'send
oo$=Text1.Text
MSComm1.Output = oo$ + Chr(13)
End Sub

Private Sub Command2_Click() 'recieve
a$ = MSComm1.Input
Text2.Text = a$
End Sub

都很正常，但是要依次按2个按钮，嫌麻烦，于是乎，修改成……

Private Sub Command1_Click() 'send
oo$=Text1.Text
Text3.Text = oo$
MSComm1.Output = oo$ + Chr(13)
Sleep 2000  '延迟2秒
a$ = MSComm1.Input
Text2.Text = a$
End Sub
于是问题来了……
每次必须点2次command1才能执行所有的代码(不是双击).点第一次，只能发送，点第二次，才能收到数据……

再修改一下，变成

Private Sub Command1_Click() 'send
oo$=Text1.Text
MSComm1.Output = oo$ + Chr(13)
Command2_Click
End Sub

Private Sub Command2_Click() 'recieve
a$ = MSComm1.Input
Text2.Text = a$
End Sub

也是同样的问题……

困惑ing.....





-----------------------------------
通过串口连接一单片机

由于施工现场环境恶劣，加上产品硬件质量很操蛋……经常链接中断，就是数据传不过去也输不过来……

于是想做一个监控功能，就是一旦掉线，就会自动提示，比如弹出个msgbox之类的功能。

开始的想法是向单片机发送一个指令，单片机会自动响应，并传回一个指令，只要做一下对比（计时），就可以了。这个过程每1秒执行一次。

但是这样肯定要占用端口，会影响正常数据传输……

求解决办法，最佳答案我一个礼拜激骚都给你！！

[ 本帖最后由 shixn 于 2009-4-10 00:33 编辑 ]

ping它的ip？很容易做啊
随便找个编程语言就能做

原理是每隔固定时间ping一下它的ip，如果不通就弹个框

呃，RS232链接的。。。。。

可以通过命令行来测试是否连接吗？

用VC不更好。。。

VB不是简单么，该用VC总不能把全部程序推翻重写吧……

4#的方法不太懂，能详细说说么

我水平很菜。。

有现成软件可以监控RS232口的，而且不占用端口......

引用:

原帖由 leonWong 于 2009-4-8 18:14 发表
有现成软件可以监控RS232口的，而且不占用端口......

求求求！！！最好有源码……

引用:

原帖由 shixn 于 2009-4-8 18:32 发表

求求求！！！最好有源码……

没有源码.......
商用软件......

对楼主的要求不是太了解，vb里面有个MSCOMM32.OCX，可以直接用，很好用啊，楼主最好跟帖把需求说清楚

端口通讯拿C写个dll，VB declare以后调用。。。

应用层不大好做，如果不占用端口的话。

最可靠的方式是做串口的过滤器驱动程序

引用:

原帖由 camille 于 2009-4-9 10:16 发表
对楼主的要求不是太了解，vb里面有个MSCOMM32.OCX，可以直接用，很好用啊，楼主最好跟帖把需求说清楚

那个控件我正在用。

PC通过RS232口和一单片机通信，传输各种数据。但是这个通信过程经常断线，等半天程序没反应，才知道断线了。

现在就像做一个功能，断线就弹出提示（弹出msgbox），就是这个意思……

方案越简单越好，我也就3月的开发经验……

不知道是不是要这种软件：
http://www.ddooo.com/softdown/28332.htm
本程序通过操作windows内核,达到监视串口数据的目的.它不是串口"调试"程序,而是真正的"监视"程序!它不需打开串口(一般串口只能被一个程序占用),就可方便监视它方程序对任一串口发送与接收的数据,可设定数据类型为十六进制和ASCII码,并可方便地将数据保存成文本文件.  使用时先启动该程序并监视,然后运行您的串口程序,即可监视您程序对串口的每一个动作。

谢谢LS，就是差不多这种东西。

不过我希望可以有源码，自己编到我的程序里。

另在追加在追加一个问题……