Практическое руководство. Отображение доступных последовательных портов в Visual Basic
В этом разделе описывается использование класса My.Computer.Ports для отображения доступных последовательных портов компьютера в Visual Basic.
Чтобы дать пользователю возможность выбрать порт для использования, имена последовательных портов отображаются в элементе управления ListBox.
Пример
В этом примере циклически перебираются все строки, которые возвращает свойство My.Computer.Ports.SerialPortNames. Эти строки представляют собой имена доступных последовательных портов на компьютере.
Как правило, пользователь выбирает, какой последовательный порт приложение должно использовать из списка доступных портов. В этом примере имена последовательных портов хранятся в элементе управления ListBox. Дополнительные сведения см. в разделе Элемент управления ListBox (Windows Forms).
Sub GetSerialPortNames()
' Show all available COM ports.
For Each sp As String In My.Computer.Ports.SerialPortNames
ListBox1.Items.Add(sp)
Next
End Sub
Данный пример кода доступен также в качестве фрагмента кода IntelliSense. В окне выбора фрагмента кода он находится в разделе Связь и сеть. Дополнительные сведения см. в разделе Практическое руководство. Вставка фрагментов кода IntelliSense.
Компиляция кода
Для этого примера требуется
Ссылка проекта на System.Windows.Forms.dll
Доступ к элементам пространства имен System.Windows.Forms. Добавьте оператор Imports, если в коде не используются полностью квалифицированные имена элементов. Дополнительные сведения см. в разделе Оператор Imports (пространство имен .NET и тип).
В форме должен быть элемент управления ListBox с именем ListBox1.
Отказоустойчивость
Нет необходимости использовать элемент управления ListBox для отображения имен доступных последовательных портов. Вместо этого можно использовать ComboBox или другой элемент управления. Если приложение не требует ответа от пользователя, можно использовать для отображения информации элемент управления TextBox.
Примечание
Имена портов, возвращаемые свойством My.Computer.Ports.SerialPortNames, могут быть неверными при выполнении программы в Windows 98.Во избежание ошибок приложения используйте обработку исключений, например инструкцию Try...Catch...Finally или инструкцию Using, если имена портов необходимо использовать для открытия портов.
См. также
Задачи
Практическое руководство. Отправка строк в последовательный порт в Visual Basic
Практическое руководство. Получение строк из последовательных портов в Visual Basic