Winsock1.RemoteHost = "127.0.0.1"
Winsock1.RemotePort = 5211
Winsock1.Connect '连接
上面这部分不要放到LOAD，用一个按钮(cmdConnect)来处理连接远程主机，一个文本框(txtHostIP)填主机地址,局域网，互联网一样能联结。如下：
Private Sub cmdConnect_Click()
Winsock1.RemoteHost = txtHostIP.Text
Winsock1.RemotePort = 5211
Winsock1.Connect '连接
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024