如何：在 Visual Basic 中撥接與序列埠連接的數據機

發行項
03/05/2024

本主題描述如何在 Visual Basic 中使用 My.Computer.Ports 撥接數據機。

一般而言，數據機會連接至電腦上的其中一個序列埠。您的應用程式必須將命令傳送至適當的序列埠，才能與數據機通訊。

撥接數據機

判斷要將數據機連接至哪一個序列埠。此範例假設數據機是在 COM1。
請使用 My.Computer.Ports.OpenSerialPort 方法取得連接埠的參考。如需詳細資訊，請參閱OpenSerialPort。

Using 區塊允許應用程式即使產生例外狀況，也可關閉序列埠。所有管理序列埠的程式碼都應該出現在此區塊或 Try...Catch...Finally 區塊內。
```
Using com1 As IO.Ports.SerialPort =
        My.Computer.Ports.OpenSerialPort("COM1", 9600)
End Using
```
設定 DtrEnable 屬性，指出電腦已準備好接受從數據機傳入的傳輸。
```
com1.DtrEnable = True
```
利用 Write 方法，透過序列埠將撥接命令與電話號碼傳送至數據機。
```
com1.Write("ATDT 555-0100" & vbCrLf)
```

範例

Sub DialModem()
    ' Dial a number via an attached modem on COM1.
    Using com1 As IO.Ports.SerialPort =
            My.Computer.Ports.OpenSerialPort("COM1", 9600)
        com1.DtrEnable = True
        com1.Write("ATDT 555-0100" & vbCrLf)
        ' Insert code to transfer data to and from the modem.
    End Using
End Sub

這個程式碼範例也可用為 IntelliSense 程式碼片段。在程式碼片段選擇器中，該程式碼片段會位於 [連接和網路] 中。如需詳細資訊，請參閱 Code Snippets。

編譯程式碼

此範例需要 System 命名空間的參考。

穩固程式設計

此範例假設數據機已連接至 COM1。建議您的程式碼允許使用者從可用序列埠清單中選取想要的序列埠。如需詳細資訊，請參閱如何：顯示可用的序列埠。

此範例使用 Using 區塊以確保應用程式即使擲回例外狀況，也可關閉序列埠。如需詳細資訊，請參閱 Using 陳述式。

在此範例中，應用程式會在撥接數據機之後中斷與序列埠的連接。實際上，您會想要將資料傳輸至數據機，或從中傳輸出。如需詳細資訊，請參閱如何：接收來自序列埠的字串。

另請參閱