vb编写串口
vbPrivate Sub Command1_Click() '发送数据函数MSComm1.Output = Text1.Text '将Text1中的字符串写入传输寄存器End Sub Private Sub Command2_Click() '判断串口是否打开,如果没有打开,打开串口并初始化If MSComm1.PortOpen = False Then MSComm1.PortOpen = True MSComm1.Settings = "9600
文件大小：11KB
评论区