向表单中添加一个名为MyComm的MSComm控件，并按如下方式设置空间属性：
私有子窗体_加载()
作为整数变暗
使用MSComm1
如果。通信端口2然后。“通信端口=2”将Com2设置为通信端口。设置='9600，N，8，1 ' '设置9600 Hz，无校验，8个数据位，1个停止位的通信端口参数。(这里需要进一步说明的是：设置=“BBBB，p，d，s”。
含义：b:波特率；p:平价(平价)；d:数据位；停止位)。' InBufferSize=1024 '将缓冲区设置为接收1024字节的数据。OutBufferSize=512。' InputMode=comInputModeText '将数据接收模式设置为十六进制形式。“输入=1”将输入从接收缓冲区读取的字节数设置为1。收到一个字节时，设置OnComm事件。“溢出计数=0”清空发送缓冲区。InBufferCount=0 '清空接收缓冲区。
如果没有。然后打开端口。“端口打开=真”打开通信端口。
如果…就会结束
以…结尾