serial port，即串行端口，現在大多數硬件設備均采用串口技術與計算機相連。

Public Class Form1Private Sub GetSerialPortNames()' Show all available COM ports.For Each sp As String In My.Computer.Ports.SerialPortNamesListBox1.Items.Add(sp)NextEnd SubPrivate Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickGetSerialPortNames()End SubSub SendSerialData(ByVal data As String)' Send strings to a serial port.Using com1 As IO.Ports.SerialPort =My.Computer.Ports.OpenSerialPort("COM1")com1.WriteLine(data)End UsingEnd SubPrivate Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.ClickMessageBox.Show("開始發送數據給：" & ListBox1.SelectedItem.ToString())SendSerialData(TextBox1.Text)MessageBox.Show("發送" & Trim(TextBox1.Text) & "完畢")End Sub End Class

總結

以上是生活随笔為你收集整理的vb.net2019- 串口serial port通信的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。