鐵 銳無(wú)錫商業(yè)職業(yè)技術(shù)學(xué)院，江蘇無(wú)錫 214000

1 W insock控件簡(jiǎn)介

在VB中我們通常利用WinSock控件可以與遠(yuǎn)程計(jì)算機(jī)建立連接，并通過(guò)用戶數(shù)據(jù)文報(bào)協(xié)議 (UDP)或者傳輸控制協(xié)議 (TCP)進(jìn)行數(shù)據(jù)交換，這兩種協(xié)議都可以用來(lái)創(chuàng)建客戶與服務(wù)器應(yīng)用程序。

2 W insock控件常用屬性和方法的剖析

1）RemoteHost屬 性：遠(yuǎn) 程 主 機(jī) 的 地 址，LocalPort、RemotePort分別本地主機(jī)的端口和遠(yuǎn)程主機(jī)端口，對(duì)客戶來(lái)說(shuō)，該屬性指定發(fā)送數(shù)據(jù)的本地端口，而對(duì)于服務(wù)器來(lái)說(shuō)，這是用于偵聽(tīng)的本地端口，我們?cè)谠O(shè)置這兩個(gè)屬性時(shí)必須保證兩臺(tái)主機(jī)的端口值相同；

2）LocalIP屬性：用于返回本地機(jī)的 IP 地址，格式IP地址加點(diǎn)的字符串 (xxx.xxx.xxx.xxx)；

3）Bind 方法：其作用是為控件“保留”一個(gè)本地端口；

4）SendData方法：用于發(fā)送一條數(shù)據(jù)給另一臺(tái)主機(jī)，其語(yǔ)法是：WinSock.SendData [要發(fā)送的數(shù)據(jù)]；

5）GetData 方法：當(dāng)DataArrival事件出現(xiàn)時(shí)，代碼調(diào)用GetData方法獲取數(shù)據(jù)，并將數(shù)據(jù)存儲(chǔ)在字符串變量中。使用語(yǔ)法是：WinSock.GetData [接收數(shù)據(jù)的變量]。

3 使用W inSock控件實(shí)現(xiàn)的聊天室主要程序段

3.1 主要控件說(shuō)明

?

3.2 主機(jī)之間連接程序

3.3 窗體初始化程序

3.4 TEXT2輸入框的KeyPress事件

3.5 W INSOCK 接收到新的數(shù)據(jù)時(shí)的響應(yīng)

[1]曾強(qiáng)聰.Visual Basic 6.0程序設(shè)計(jì)教程[M].北京：中國(guó)水利水電出版社，2003.