Sdílet prostřednictvím


Postupy: Jak odeslat řetězce na sériové porty v jazyce Visual Basic

Toto téma popisuje způsob použití My.Computer.Ports k odeslání řetězce na sériové porty počítače v Visual Basic.

Příklad

V tomto příkladu odešleme řetězec na sériový port COM1. Je možné, že budete muset použít jiný sériový port vašeho počítače.

Použijte metodu My.Computer.Ports.OpenSerialPort chcete-li získat odkaz na port. Další informace naleznete v tématu OpenSerialPort.

Blok Using povolí aplikaci uzavření sériového portu i v případě, že vygeneruje výjimka. Všechen kód, který manipuluje s sériovými port by se měl nacházet v rámci tohoto bloku nebo v rámci bloku Try...Catch...Finally.

Metoda WriteLine odesílá data na sériový port.

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

Probíhá kompilace kódu

  • Tento příklad předpokládá, že počítač používá COM1.

Robustní programování

Tento příklad předpokládá, že počítač používá COM1; pro větší flexibilitu, by měla aplikace umožnit uživateli vybrat požadovaný sériový port ze seznamu dostupných portů. Další informace naleznete v tématu Postupy: Jak zobrazit dostupně sériové porty v jazyce Visual Basic.

V tomto příkladu je použit blok Using k zajištění toho, že aplikace zavře port i v případě, že nastane výjimka. Další informace naleznete v tématu Using Statement (Visual Basic).

Viz také

Úkoly

Postupy: Jak vytáčet modemy připojené k sériovým portům v jazyce Visual Basic

Postupy: Jak zobrazit dostupně sériové porty v jazyce Visual Basic

Odkaz

Ports

System.IO.Ports.SerialPort