菜鸟求助（急）：用VB怎么实现两个电脑间的串口通讯

Question

就是两台电脑间用串口进行通讯,用VB来实现。
刚接触vb，明白是用mscomm控件编程，可是有些地方编不出。不知有没有大虾有简单的小程序，可以学习下。
先谢了，急求！！！

Answer 1

楼主看这个链接！
http://www.programfan.com/article/showarticle.asp?id=2708

Answer 2

网上搜索一下 很多的
首先你要知道些at指令 然后MSCTel_OnComm事件中 编程 然后还有其他....

Answer 3

可以直接用自带的好像叫MSCOMMT这个控件可以实现

Answer 4

用这个控件就可以了mscomm
但是有些参数你得设置才能用,否则什么都读不出来的
注意COM口是独占方式的
如果你有问题,可以找我,我有这方面的代码
[email protected]

Answer 5

首先需要自己做一个反跳线。
RS-232C接口定义(9芯)针脚 定义 符号 
1 载波检测 DCD 
2 接收数据 RXD 
3 发送数据 TXD 
4 数据终端准备好 DTR 
5 信号地 SG 
6 数据准备好 DSR 
7 请求发送 RTS 
8 清除发送 CTS 
9 振铃提示 RI 简单的方法就是使用3条线，将2和3反跳，然后再接5接地。分别连接到两台电脑之后，就可以用MSCOMM通讯了。
在MSDN中有一个非常详细的通讯例程：Private Sub MSComm_OnComm ()
   Select Case MSComm1.CommEvent
      Case comEventBreak   ' 收到 Break。
      Case comEventCDTO   ' CD (RLSD) 超时。
      Case comEventCTSTO   ' CTS Timeout。
      Case comEventDSRTO   ' DSR Timeout。
      Case comEventFrame   ' Framing Error
      Case comEventOverrun   '数据丢失。
      Case comEventRxOver'接收缓冲区溢出。
      Case comEventRxParity' Parity 错误。
      Case comEventTxFull   '传输缓冲区已满。
      Case comEventDCB   '获取 DCB] 时意外错误
      Case comEvCD   ' CD 线状态变化。
      Case comEvCTS   ' CTS 线状态变化。
      Case comEvDSR   ' DSR 线状态变化。
      Case comEvRing   ' Ring Indicator 变化。
      Case comEvReceive   ' 收到 RThreshold # of chars.
      Case comEvSend   ' 传输缓冲区有 Sthreshold 个字符                     '
                     '
      Case comEvEof   ' 输入数据流中发现 EOF 字符
                     ' 
   End Select
End Sub
其中最有用的就是：
Case comEvReceive  和 Case comEvSend
一个是当接收到数据的时候触发，一个是当发送数据的时候触发。

Answer 6

谢谢WallesCai，没想到有这么多人回，第一次发帖，好感动，555