在VB中如何使用 Winsock 控件

    （5）在“计算机名称”框中可以找到计算机的名称。

    （6）上面找到的计算机名称可以作为 RemoteHost 属性的值。

2． Winsock控件使用 TCP 协议应用实例

    如果应用程序要使用 TCP 协议，那么首先必须决定应用程序是服务器还是客户端。如果要创建一个服务器端，那么应用程序需要“监听”指定的端口。当客户端提出连接请求时，服务器端能够接受请求并建立连接。在连接建立之后，客户端与服务器端可以自由地互相通讯。

    下列步骤创建一个非常简单的服务器：

    （1

    （2） 创建新的 Standard EXE 工程。

    （3） 将窗体的标题改为“TCP 服务器”。

（4） 在窗体中放入一个 Winsock 控件(c:\windows\system\mswinsck.ocx)，并将它的名字改为 tcpServer。

    （5） 在窗体上添加两个 TextBox 控件。将第一个命名为 txtSend，第二个为 txtOutput。

    为窗体添加如下的代码。

Private Sub Form_Load()

'将 LocalPort 属性设置为一个整