Como: Enviar seqüências para portas seriais no Visual Basic
Este tópico descreve como usar My.Computer.Ports para enviar sequências de caracteres para portas seriais do computador em Visual Basic .
Exemplo
Este exemplo envia uma sequência de caracteres para a porta serial Com1.Você talvez precise usar uma porta serial diferente no seu computador.
Use o método My.Computer.Ports.OpenSerialPort para obter uma referência para a porta.Para obter mais informações, consulte My.Computador.Ports.OpenSerialPort método.
O bloco Using permite que ao aplicativo feche a porta serial mesmo que se 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 para a 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 assume que o computador está utilizando a COM1.
Programação robusta
Este exemplo assume que o computador está utilizando COM1; para maior flexibilidade, o código deveria permitir ao usuário que selecionasse a porta serial desejada em uma lista de portas disponíveis.Para obter mais informações, consulte Como: Show disponível Serial Ports in Visual Basic.
Este exemplo usa um bloco Using para se certificar de que o aplicativo fecha a porta mesmo se ele lançar uma exceção.Para obter mais informações, consulte Instrução Using (Visual Basic).
Consulte também
Tarefas
Como: Discar modems anexados a portas seriais no Visual Basic
Como: Show disponível Serial Ports in Visual Basic