Cómo: Mostrar los puertos serie disponibles en Visual Basic
En este tema se describe cómo utilizar My.Computer.Ports para mostrar los puertos serie disponibles del equipo en Visual Basic.
Para permitir que un usuario seleccione el puerto que desea utilizar, los nombres de los puertos serie se colocan en un control ListBox.
Ejemplo
Este ejemplo recorre todas las cadenas que devuelve la propiedad My.Computer.Ports.SerialPortNames. Estas cadenas son los nombres de los puertos serie disponibles en el equipo.
Normalmente, un usuario selecciona el puerto serie que la aplicación debe utilizar en la lista de puertos disponibles. En este ejemplo, los nombres de puertos serie se almacenan en un control ListBox. Para obtener más información, vea ListBox (Control, formularios 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
Este ejemplo de código también está disponible como fragmento de código de IntelliSense. En el selector de fragmentos de código, se encuentra en Conectividad y redes. Para obtener más información, vea Cómo: Insertar fragmentos de código de IntelliSense.
Compilar el código
Para este ejemplo se necesita:
Una referencia de proyecto a System.Windows.Forms.dll.
Acceso a los miembros del espacio de nombres System.Windows.Forms. Agregar una instrucción Imports si no se incluyen nombres de miembro completos en el código. Para obtener más información, vea Instrucción Imports (Tipo y espacio de nombres de .NET).
Que el formulario tenga un control ListBox denominado ListBox1.
Programación eficaz
No tiene que utilizar el control ListBox para mostrar los nombres de los puertos serie disponibles. En su lugar, puede utilizar un control ComboBox u otro control. Si la aplicación no necesita una respuesta del usuario, puede utilizar un control TextBox para mostrar la información.
Nota
Es posible que los nombres de puerto devueltos por My.Computer.Ports.SerialPortNames sean incorrectos cuando se ejecuta en Windows 98. Para evitar que se produzcan errores en la aplicación, use el control de excepciones, como la instrucción Try...Catch...Finally o la instrucción Using, cuando utilice los nombres de puerto para abrir los puertos.
Vea también
Tareas
Cómo: Marcar a través de módems conectados a puertos serie en Visual Basic
Cómo: Enviar cadenas a puertos serie en Visual Basic
Cómo: Recibir cadenas de puertos serie en Visual Basic