(1) 开启一个新的VB项目（数据发送），并在在窗体中安排一个Lable（Lable1）和一个Timer控件（timer1）作为时间事件控制。

(2) 安排一个MSComm控件，作为串行通讯的信道，按下F4调出属性窗口，变更CommPort属性值为2，另外将RThreshoId属性设为1。

(3)安排两个个Label（Label2，Label3）控件， 按下F4调出属性窗口，将Label2的Caption属性改为“命令接收区”，Label3的Caption属性改为“信息发送区”。

(4)安排两个文本控件（text1，text2），text1作为显示对方所传送过来的命令要求的控件，text2显示发送数据。

(5)安排三个命令按钮，分别将Caption属性改为“清除接收区”，“清除发送区”及“结束按钮”，作为清除和结束用。

将时钟控件Timer1的Interval属性值设为1000，每秒发送一次数据，每秒读取50行数据；双击MSComm加入通讯控制程序；在“清除接收区”按钮的CLICK事件中填入Text1.Text=””作清除信息按钮；在“结束系统”的按钮中填入End作为结束按钮。

窗口设计图如下：

用Rs-232连接后进行运行。Rs-232数据线实物图如下