Поделиться через


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

См. также