用winsock咋样通过UDP接受代理服务器的数据？

Question

連接服務器(TCP)
with WinSCK
     .RemoteHost = ServerName
     .RemotePort = 端口號
     .protocol = sckTCPProtocol
     .connect
end with
等連接成功后,發送認証
winsck.senddata("send" & vbcrlf)
接受都在用GetData方法﹐通常在DataArrival時間中使用GetData方法,例如:
Private Sub WinSCK_DataArrival(Index As Integer, ByVal bytesTotal As Long)
    dim strData as string
    winsck.GetData strData,vbString
End Sub連接服務器(UDP)
with WinSCK
     .RemoteHost = Server
     .RemotePort = 端口號
     .protocol = sckUDPProtocol
     .connect
end with