在VB6.0中用winsock控件制作网络聊天程序的方法
Internet的出现改变了人们的生活，也成为了现代社会的最显
著的标志。VB6.0中的Winsock控件正是当前Internet软件开发的
主要工具之一，本文将通过一个网络聊天程序的制作与您共同探讨该
控件在Internet网络应用程序开发中的技术。
制作网络聊天的关键是了解Winsock控件，在VB6.0中该控件以
部件的形式将WinsockAPIs形象地呈现给程序员，Winsock控件提
供了访问TCP和UDP网络服务的方便途径，程序员可以使用它很方便
地完成网络应用程序的开发，而不必了解网络协议的细节或调用低级
的WinsockAPIs，只需通过设置控件的属性并调用其方法就可方便
地连接到一台远程机器上去，且还可双向交换数据。当我们做到这一
点时，基于Internet网络的应用程序也就完成了。
以下是在VB6.0中用winsock控件制作网络聊天程序的技术过
程：
?一、设计程序界面
?1、启动VB6.0新建一个EXE工程，在窗体上添加五个标签
（label）、两个按钮（coandbutton）、五个文本框（textbox）。
?2、在工具栏上空白处点右键，选择部件，打开部件对话
框，在控件选项卡内找到MicrosoftWinsockCotrol6.0，
在前面的复选框内打√，选择确定。将Winsock控件添加
到窗体上。
3、调整各控件的大小，如图一图一
二、设置各对象的属性
1、在属性窗口中将各对象属性设置如下表：
序号对象属性名属性值属性名属性值
1窗体(form)caption网络聊天程序
2标签(label1)caption本地计算机名：
3标签(label2)caption（为空）namelclpclbl
4标签(label3)caption本地端口：
5标签(label4)caption连接对象：
6标签(label5)caption远程端口：
7按钮（command1）caption发送namesndbtn
8按钮（command2）caption连接namecnctbtn
text（为空）namercvtxt
9文本框(text1)
scrollbar2mutilinetrue
10文本框(text2)text（为空）nameinpttxt
11文本框(text3)text（为空）namelclprt
12文本框(text4)text（为空）namermtpc
13文本框(text5)text（为空）namermtprt
2、调整各控件的大小，制作完成后的程序界面如图二
三、编写程序代码图二
程序代码及含义如下：
OptionExplicit