Cómo: Enviar cadenas a puertos serie en Visual Basic
En este tema se explica cómo usar My.Computer.Ports
para enviar cadenas a los puertos serie del equipo en Visual Basic.
Ejemplo
En este ejemplo se envía una cadena al puerto serie COM1. Es posible que tenga que usar un puerto serie diferente en el equipo.
Use el método My.Computer.Ports.OpenSerialPort
para obtener una referencia al puerto. Para obtener más información, vea OpenSerialPort.
El bloque Using
permite a la aplicación cerrar el puerto serie aun cuando se genere una excepción. Todo el código que manipula el puerto serie debe aparecer dentro de este bloque o dentro un bloque Try...Catch...Finally
.
El método WriteLine envía los datos al puerto serie.
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
Compilar el código
- En este ejemplo se presupone que el equipo usa
COM1
.
Programación sólida
En este ejemplo se presupone que el equipo está usando COM1
. Para obtener mayor flexibilidad, el código debe permitir al usuario seleccionar el puerto serie deseado entre una lista de puertos disponibles. Para obtener más información, vea How to: Show Available Serial Ports (Cómo: Mostrar los puertos serie disponibles en Visual Basic).
En este ejemplo se usa un bloque Using
para asegurarse de que la aplicación cierra el puerto incluso si se produce una excepción. Para obtener más información, vea Using (Instrucción).