请高人指点，如何用VB实现串口通信的编程[求助]

上位机向下位机发送的命令有校时命令、请求内存命令、发送数据命令、快采命令和慢采命令等。发送命令有两种发送方式,即手动方式和自动方式,自动方式是由定时器来完成的。
下面是发送数传命令的子过程,启动该过程由一个定时器控制:
Sub sample_data ()
comm1.RTSEnable = True 将上位机置高,
Call time_delay 适当延时
comm1.Output = "*关机" + Chr$(13) 发送命令
Do
该循环用来检测命令是否全部发送完毕
Loop Until comm1.OutBufferCount = 0
Call time_delay
适当延时
comm1.RTSEnable = False 将上位机置低,改为接受状态
comm1.InBufferCount = 0 清空接收缓冲区
comm1.RThreshold = 1 设定RThreshold = 1,等待出发OnComm事件
End Sub

哈哈
因为你这个东西是毕业设计，所以没意思！
真要做的好的话
1。解一plc的协议
2。了解工作过程
  调速器在水电站总知道干什么吧？
  没并列前采什么数据，并列后采什么数据，出事故了怎么处理
  要不要按照有功曲线来运行等等
3。至于开机，关机这些东西，你学自动化的所以就不说了。

mscomm只能通信，具体其他命令如关机等可用shall或其他指令，可以根据接受的字符判断要执行的命令。