VB.net学习笔记之串口通讯：System.IO.Ports.SerialPort

Dim com1 As New System.IO.Ports.SerialPort("COM2") '申明一个串口
com1.Open()  '打开串口
com1.Write(1)  '发送数据
com1.Close()  '关闭串口

每一次发送完数据后，都一定要关闭串口占用，否则其他程序将无法使用此串口。