Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
В этом разделе описывается, как использовать 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.