Como enviar cadeias de caracteres para portas seriais no Visual Basic
Este tópico descreve como usar o My.Computer.Ports
para enviar cadeias de caracteres para portas seriais do computador em Visual Basic.
Exemplo
Este exemplo envia uma cadeia de caracteres para a porta serial COM1. Talvez você precise usar uma porta serial diferente em seu computador.
Use o método My.Computer.Ports.OpenSerialPort
para obter uma referência para a porta. Para obter mais informações, consulte OpenSerialPort.
O bloco Using
permite que o aplicativo feche a porta serial mesmo que ele gere uma exceção. Todo o código que manipula a porta serial deve aparecer dentro deste bloco ou em um bloco Try...Catch...Finally
.
O método WriteLine envia os dados à porta serial.
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
Compilando o código
- Este exemplo pressupõe que o computador esteja usando a
COM1
.
Programação robusta
Este exemplo pressupõe que o computador esteja usando a COM1
. Para obter mais flexibilidade, o código deve permitir que o usuário selecione a porta serial desejada na lista de portas disponíveis. Para obter mais informações, consulte Como mostrar portas seriais disponíveis.
Este exemplo usa um bloco Using
para garantir que o aplicativo feche a porta mesmo que ele lance uma exceção. Para obter mais informações, consulte Instrução using.