如何在VB.NET中用Socket類實現局域網中的通信問題

With Winsock1

.RemoteHost = "124.135.13.106" '對方的IP

.RemotePort = 1002 ' 對方的端口號

.Bind 1001 ' 本機的端口號

End With

End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)

Dim strData As String

Winsock1.GetData strData '接收字節

List1.AddItem strData

End Sub

這個用UDP進行連接的。只不過是對單個機器進行的。