|
 一、设定服务器主机名、端口号、开始连接
［创建客户连接服务器］
要创建客户连接服务器，首先设置服务器主机名，如：IP地址，域名或计算机名，然后设置服务端口号，最后连接到服务器。
向窗体增加一个WinSock控件，并修改其Name属性为SockClient。
在Connect按钮事件中增加如下代码。
SockServer.RemoteHost = Text2.Text
SockServer.RemotePort = Clnt(Text3.Text)
SockServer.Connect
其中:
RemoteHost 属性表示服务器主机名。
RemotePort 属性表示服务器端口号
Connect 方法连接到服务器。
二、响应服务器关闭连接
Private Sub SockClient_Close(Index As Integer)
SockClient.Close
End Sub
|
