Практическое руководство. Отправка строк в последовательный порт в 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.

См. также