計算機網(wǎng)絡(luò)課程設(shè)計(tcp協(xié)議聊天程序-免費閱讀
【正文】 聊天發(fā)送的消息包括：用戶名稱 和 正文。數(shù)據(jù)到達 Winsock1(Index).GetData c, vbString Dim i As Integer For i = 1 To UBound(Gac) If Not i = Index Then If Gac(i) Then Winsock1(i).SendData c DoEvents End If End If Next i End Sub 五 、 可執(zhí)行文件的生成 點擊“文件” — “生成服務(wù)器 .exe”即可生成服務(wù)器端的可執(zhí)行文件 。 amp。 3. 在窗體中添加一個 ListBox 控件，將其命名為“ ListBox”。 , then Press Menu 39。點擊 Fileexit,退出聊天 End End Sub Private Sub Form_Load() 39。 Label 控 件，其命名默認為 Label Label Label Label4，并將它們的 Caption 屬性修改為“ 編輯窗口 ”、“聊天記錄”、“系統(tǒng)消息”、“服務(wù)器 IP”。 三 、 設(shè)計客戶端 客戶端的程序編寫： “客戶”。程序 完 成 后最終生成服務(wù)器和客戶端兩個 可執(zhí)行文件，打開服務(wù)器可執(zhí)行文件，即運行服務(wù)器，然后客戶端可 以與 局域網(wǎng)上不同的主機上運行，輸入服務(wù)器主機的 IP，連接到服務(wù)器，客戶端與客戶端之間即可實現(xiàn)簡易的聊天功能，在服務(wù)器可以顯示在線人數(shù)以及客戶端的 IP地址。 服務(wù)完成后，關(guān)閉此新進程與客戶的通信鏈路，并終止 。 StatusBar 控件與其他控件如 ToolBar 控件一起，可以使你創(chuàng)建經(jīng)濟而又富含信息的用戶界面。 本設(shè)計中，我們用的是 TCP 協(xié)議。 TCP 三次握手的過程 （如圖所示） 如下： 客戶端發(fā)送 SYN（ SEQ=x）報文給服務(wù)器端，進入 SYN_SEND 狀態(tài)。 我們的簡易聊天軟件可以實現(xiàn)多人在線聊天、 查看聊天記錄 、清空聊天記錄等等功能。 在服務(wù)端，可以設(shè)置端口，查看客戶端的人數(shù)和 IP，能和指定的用戶進行通信。在客戶端，通過設(shè)置服務(wù)端的 IP 和端口號來來連接服務(wù)端，在客戶端可以顯示出是否已連接。 關(guān)鍵字： Visual Basic TCP 協(xié)議 WinSock 控件 StatusBar 控件 目錄 引言 .................................................... 1 一、背景介紹 ......................................... 1 二、 TCP 協(xié)議 .......................................... 1 三、 Visual Basic Winsock 控件介紹 ...................... 2 四、 Visual Basic StatusBar 控件介紹 .................... 2 五、客戶端 /服務(wù)器模式 ................................. 2 六、 設(shè)計目的 ......................................... 3 基于 TCP 協(xié)議聊天軟件的制作過程 ........................... 4 一、客戶端工作原理 .................................... 4 二、服務(wù)器工作原理 .................................... 4 三、設(shè)計客戶端 ........................................ 5 四、設(shè)計服務(wù)器 ........................................ 8 五、可執(zhí)行文件的生成 ................................. 10 六、聊天軟件的測試 ..................................
教學課件相關(guān)推薦
鄂ICP備17016276號-1