Visual Basic/正在進行

這是一個工作區。簡短的文字片段、提醒和連結，它們不值得單獨建立一個頁面，但需要一個臨時的家，以防它們被遺忘，從這裡開始。

雜項

VB 中的 Unicode 問題，新增 Unicode 支援，Unicode 自定義控制元件，

inet 控制元件 winsock 控制元件 comm 控制元件

Visual Basic 允許透過 Winsock 透過點對點 (PTP) 連線傳送資料。插入控制元件後，只需幾個命令即可在兩臺聯網計算機之間傳送資料。兩臺計算機之間必須連線 LAN 線纜。

要允許 Winsock 連線到任何可用的計算機，需要監聽命令，如下所示

Winsock.Port = 1234
Winsock.Listen

完成此操作後，需要另一臺計算機的本地 IP 地址。你的 IP 地址可以透過以下命令檢視

Debug.Print Winsock.LocalIP

連線只需要一行程式碼，如下所示

Winsock.Connect RemoteHost, Port

埠可以是 50,000 以下的任何數字。上面的示例是 1234。

要接受連線，你需要建立一個新的子程式

Private Sub Winsock_ConnectionRequest(ByVal requestID As Long)
Winsock.Accept requestid
End Sub

傳送資料也很簡單。

Winsock.SendData Data

要接收任何傳送的資料，需要另一個新的子程式

Private Sub Winsock_DataArrival(ByVal bytestotal As Long)
Dim nData as String
Winsock.GetData nData
End Sub

使用上面的程式碼，在兩臺計算機之間建立工作資料交換相對容易。有關此主題的更多資訊，請參見“片段”部分。

為 VBZip 等新增示例。

參見

參見