Практическое руководство. Отправка строк в последовательный порт в Visual Basic
В этом разделе описывается, как использовать My.Computer.Ports для отправки строк в последовательные порты компьютера в Visual Basic.
Пример
Этот пример кода отправляет строку в последовательный порт COM1. Возможно, на вашем компьютере потребуется использовать другой последовательный порт.
Воспользуйтесь методом My.Computer.Ports.OpenSerialPort, чтобы получить ссылку на порт. Дополнительные сведения см. в разделе OpenSerialPort.
Блок Using позволяет приложению закрыть последовательный порт даже в том случае, если он создает исключение. В блоке Try...Catch...Finally должен отображаться весь код, управляющий последовательным портом.
Метод WriteLine отправляет данные в последовательный порт.
Sub 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 Using
End Sub
Компиляция кода
- В этом примере предполагается, что компьютер использует
COM1.
Отказоустойчивость
В этом примере предполагается, что компьютер использует COM1. Для большей гибкости код должен позволять пользователю выбирать нужный последовательный порт из списка доступных портов. Дополнительные сведения см. в разделе Практическое руководство. Отображение доступных последовательных портов.
В этом примере блок Using позволяет сделать так, чтобы приложение закрыло порт, даже если он создает исключение. Дополнительные сведения см. в разделе Оператор using.
