企業(yè)網(wǎng)上尋呼系統(tǒng)的設計與實現(xiàn)畢業(yè)論文(參考版)
2025-06-29 09:55本頁面
【正文】 at zu Berlin, April 2004:818。 End Sub其他代碼和服務器端類似,在此略. 發(fā)送消息窗體發(fā)送消息窗體功能較為簡單,主要是對發(fā)送的消息進行編輯,并發(fā)送該消息.1 界面設計發(fā)送消息窗體界面如圖85所示,主要包含三個按鈕控件；一個ImageList和ImageCombo控件相結(jié)合顯示消息的表情,一個CommonDialog控件,一個RichTextBox :其中ilsChatFaces 控件和imgcboChatFaces控件屬性設置與客戶端主窗體中的類似,這里不再贅述了. 圖85 發(fā)送消息窗體界表83 發(fā)送消息窗體主要控件屬性控件屬性屬性取值frmChat(Form)NamefrmChatCaption發(fā)送消息cmdColorNamecmdColorCaption顏色cmdFontNamecmdFontCaption字體cmdSendNamecmdSendCaption發(fā)送dlgFontAndColorNamedlgFontAndColorilsChatFacesNameilsChatFacesimgcboChatFacesNameimgcboChatFacesrtfContentNamertfContentimgFaceNameimgFace⒉ 代碼略. 接受最新消息窗體接受最新消息窗體功能較為簡單,包括完成最新信息的瀏覽,以及把瀏覽過的消息添加到老消息表中.1. 界面設計接收消息界面如圖86所示,一共只有三個控件,分別是DataGrid控件、RichTextBox控件、Adodc控件,它們的屬性如表84所示.圖86 接受最新消息窗體界面表84 接受最新消息窗體控件屬性控件屬性屬性取值frmNewMsg(Form)NamefrmNewMsgCaption最新消息rtfContentNamertfContentdgdMessagesNamedgdMessagesadoMessagesNameadoMessagesCaption信息⒉代碼略. 查看歷史消息窗體查看歷史消息窗體功能也較為簡單,包括完成歷史信息的瀏覽,以及消息刪除.查看歷史消息窗體界面和接收最新消息窗體類似,如圖76所示,這里不再贅述.“清空”按鈕,程序?qū)h除OldMsg表中當前用戶的所有消息.“刪除”按鈕,程序?qū)h除當前查看的那條歷史信息.以上代碼均略.系統(tǒng)運行下面測試系統(tǒng)實際運行的效果.首先運行服務器程序,由于這時沒有用戶登錄,所以在線用戶為0,也沒有用戶留言,如圖91所示:圖91 服務器主程序運行客戶端程序,出現(xiàn)的是登錄界面,以用戶號碼1001登錄,密碼為111,如圖92所示:圖92 登錄窗口單擊“登錄”按鈕,進入聊天界面.雙擊“我的好友”中好友圖標,彈出發(fā)送消息窗口,輸入消息.單擊“菜單”按鈕,彈出的菜單中,單擊“顯示新消息”命令,彈出新消息窗體,如圖93所示:圖93 最新消息窗體總結(jié)致謝 經(jīng)過近一個月的努力,并在老師耐心細致的指導下,通過翻閱大量的資料,系統(tǒng)用Visual Basic作為開發(fā)環(huán)境,、短小精煉,具有很強的實用性和示范意義,可為開發(fā)網(wǎng)絡數(shù)據(jù)通信系統(tǒng)所借鑒.通過這次畢業(yè)設計可以體會到VB最大的優(yōu)點就是簡單易學,編寫代碼方便,可視化程度高,需要龐大的運行時間庫支持,軟件發(fā)行比較困難(編譯后的EXE程序如果在沒有安裝過VB的機器上運行需要拷貝數(shù)M的文件,并且做一些設置工作)；底層調(diào)用手段較少,不太適合開發(fā)硬件操作多、速度要求高的場合,比如編寫硬件驅(qū)動程序就不能使用VB.系統(tǒng)在設計過程中不可避免地遇到了各種各樣的問題,由于整個系統(tǒng)完全都是由個人設計的,許多細節(jié)問題都要靠自己去摸索,加上水平有限,因此還存在著許多不足之處,在這次畢業(yè)設計過程中,XX老師極大的幫助,他認真負責的工作態(tài)度、嚴謹?shù)闹螌W風格,使本人深受啟發(fā),這樣畢業(yè)設計才順利完成,在此表示感謝！ 參考文獻[1] Basic 6從入門到精通.[M]北京：電子工業(yè)出版社,1999年6月:145[2]陳學東, Basic . [M]北京：清華大學出版社,2005年4月:85100[3]四維科技,趙斯思. Visual Basic數(shù)據(jù)庫編程技術(shù)與實例. [M]北京：人民郵電出版社,2004年3月:4060[4]張路平,喻波,邵謙謙. Visual Basic . [M]北京：電子工業(yè)出版社,2005年3月:100115[5] Basic實用編程百例. [M]北京：清華大學出版社,2000年5月:98110[6]汪曉平. Visual Basic網(wǎng)絡高級編程. [M]北京：人民郵電出版社,2001年4月:2450[7]陳峰棋,柴明建. Visual Basic網(wǎng)絡編程從入門到精通. [M]北京：中國鐵道出版社,2002年7月:3035[8]Microsoft Basic 高級編程.[M]北京：北京大學出版社,2000年9月:96135[9]周峰, Basic 程序設計.[M]西安：西安電子科技大學出版社, 2004年2月:47[10] by Step (Microsoft Visual Basic ).[M] Microsoft Press: Redmond, WA, 1998年6月:59[11].[M]AddisionWesley: Reading, MA, 2002年1月:5058[12] Prof. Dr. Wolfgang H168。 。 Data Source= amp。 LTrim(Str(i)), UserID, LTrim(Str(Friends(i).UserID)), fileName) NextEnd Sub 窗體設計 系統(tǒng)登錄窗體系統(tǒng)登錄窗體主要功能是用戶的登錄、注冊和服務器IP地址的獲取和設置.1. 界面設計登錄窗體的界面如圖81所示,其中的控件主要包括7個文本框控件、6個按鈕控件、一個ImageCombo控件、一個ImageList控件和一些標簽控件,這些控件的屬性如表81所示:圖81 登錄界面設計其中ilsIcons控件的屬性設置為,加入該控件后, Pages屬性窗口中單擊Images頁面,通過Insert Picture按鈕加入用戶頭像.2. ,用戶的檢測與注冊以及服務器地址的獲取與設置.Private Sub Form_Load()For i = 0 To 1 , , , i + 1, i + 1表81 登錄界面主要控件屬性控件屬性屬性取值frmLoginNamefrmLoginCaption登錄cmdLoginNamecmdLoginCaption登錄cmdIPNamecmdIPCaption服務器IPcmdNewNamecmdNewCaption新用戶cmdCancelNamecmdCancelCaption取消imgcboFaceNameimgcboFaceilsIconsNameilsIconscmdRegisterNamecmdRegisterCaption注冊cmdSetIPNamecmdSetIPCaption設置圖82 ImageList屬性設置Next(1).Selected = True = ServerIPEnd SubPrivate Sub cmdLogin_Click() = UserPwd = blnNewUser = FalseEnd SubPrivate Sub cmdNew_Click()If = 新用戶 Then = 隱藏 = + 3750Else = 新用戶 = 3750End IfEnd SubPrivate Sub cmdSetIP_Click()ServerIP = Trim()End Sub 客戶端主窗體 客戶端主窗體是客戶端的核心模塊,完成客戶端的主要操作,主要功能包括顯示、添加、刪除好友和黑名單,調(diào)用發(fā)送、接收消息窗口,響應服務器發(fā)過來的信息. 客戶端主窗體的界面如圖83所示,主要包括4個命令按鈕、WinSock控件、時鐘控件、Adodc控件、ImageList控件、listview控件等,主要控件屬性如表82所示:圖83 客戶端主窗體界面其中l(wèi)vwUsers控件的屬性設置為,右擊該控件,彈出如圖84所示窗口ProPerty Pages,選擇Image Lists頁,在 Normal和 Small中都選定ilsIcons,這里就不再贅述了.圖84 lvwUsers控件屬性窗口表82 客戶端主窗體控件屬性控件屬性屬性取值frmClient(Form)NamefrmClientCaption聊天程序ilsIconsNameilsIconsadoMessagesNameadoMessagesCaption新消息tmrMessagesNametmrMessagesInterval300cmdMenuNamecmdMenuCaption菜單cmdStatusNamecmdStatusCaption離線cmdBadboysNamecmdBadboysCaption黑名單cmdFriendsNamecmdFrien
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1