電子詞典設計與開發pb—計算機畢業設計(論文)-資料下載頁

【導讀】并迅速和人們的日常生活結合在一起。計算機技術的發展和進步也使電子語言詞。典的誕生成為可能。雖然只有十來年的歷史，電子詞典卻已經迅速發展壯大，成。為詞典家族中具有旺盛生命力的一員。盡管目前它尚不足以取代傳統詞典，但在。詞典的有力競爭者，并對傳統的詞典提出了挑戰。作環境，制作流程，對數據庫的操作以及它的使用方法。用戶可以根據自己的需。要去查詢單詞，添加單詞，刪除單詞，編輯單詞等。另外，它還給單詞學習者們。提供了一個背單詞的好方法。每一個用戶都可以通過創建一個用戶名來背誦單。詞，隨時查看自己的歷史記錄，以便確定自己的背誦進度。本文從軟件工程的角。度進行了詳細的闡述。該系統的開發工具是powerbuilder，使用的數據庫為

　　

【正文】 功能，但是也存在一些不足，比如界面不夠美觀，沒有屏幕取詞功能等。這些在今后的工作中改進這些問題。希望以后的程序設計當中，能夠編寫出更完善的更好的程序出來 通過這次對電子詞典的設計與開發的畢業設計中，我學到了很多書本上學不到的實踐知識，使我掌握了很多操作數據庫的技巧，從完全書本化的理論知識轉化為真正有用的實踐知識。 這次開發電子詞典使我更加了解了使用 PB9 的開發軟件流程。對于數據庫這個概念有一個更深層次的了解。在這次電子詞典的設計和開發中，我遇到了各種各樣的困難，比如，由于不清楚一個對數據窗口操作的函數而導致程序無法繼續運行的情況。但是，這些問題都在詢問指導老師和查詢相關書籍的情況下得到了解決。 本人在這次軟件的制作過程當中，最大的心得是學會了使用幫助文件和設置斷點來調試程序。我想不管怎樣，即使你在編程的過程中需要用到一個函數的時候，你不可能每次都能幸運的從書本中查找到你想要的函數。但是聯機幫助就會使你很方便的得到你 想要的函數。而斷點則可以幫助你隨時隨地準確的去觀察變量里的附值。 電子詞典設計與開發 31 致 謝 大學即將結束，在此，我要感謝所有曾經在學習上和生活中給予過我幫助的老師和同學們。 尤其要感謝我的指導老師沈麗容老師，在本次畢業設計中，我從沈老師身上學到了很多東西。沈老師認真負責的工作態度，嚴謹的治學精神和深厚的理論水平都使我收益匪淺。無論在理論上還是在實踐中，沈老師都給與我很大的幫助，使我學到以前在書本上所學不到的知識，這對于我以后的工作和學習都有一種巨大的幫助。感謝沈老師耐心的教導，同時也要感謝給予過幫助的同學和老師。 學校在這 方面也給我們提供了很大的支持和幫助，學校以及學院領導也比較重視，定期關心設計進展，為設計提供較大的方便，同時為每個設計小組配有專門的指導老師，幫助我們能順利完成整個設計。對于學校和老師為我的畢業設計所提供的極大幫助和關心，在此我表示衷心的感謝！ 電子詞典設計與開發 32 參考文獻 [1] 郭寶利編著， PowerBuilder 完全解析 北京：電子工業出版社 [2] 樊金生等編著， PowerBuilder 實用教程 北京：科學出版社 [3] 何旭洪，余建英編著， PowerBuilder 數據庫系統開發實例導航 北京：人民郵電出版社 [4] 業寧編著，數據庫實戰 南京：南京林業大學 [5] 朱愛民，柯建勛編著， 與系統開發 北京：清華大學出版社 2021 [6] 徐松林，路斌，王冬春等編著， PowerBuilder 數據庫應用開發教程 北京：清華大學出版社 2021 [7] 楊昭主編， 實用參考手冊 北京： 中國水利水電出版社 [8] 王謙 ， 劉元濤 ， 醫院住院管理信息系統的研究開發 微型電腦應用 2021 年01 期 [9] 歐冰玉 ， 利用 PowerBuilder 開發醫院住院收費管理系統實例 廣西科學院學報 2021 年 S1 期 [10] Bob Hendry， Programming with the PFC:PowerBuilder Plastic Comb May 2021 電子詞典設計與開發 33 附 錄程序 1：用戶登錄界面代碼 if = then messagebox(提示 ,請輸入您的用戶名) else SELECT userinfo.userpassword, userinfo.username INTO :user_password, :user_name FROM userinfo where username = :。 if user_password = then opensheet (w_selectfunction,w_main,4,original!) close(parent) elseif = then messagebox(提示 ,請輸入您的密碼) else messagebox(提示 ,您輸入的密碼有誤 ) end if end if 單詞瀏覽代碼： if c = words_sum 1 then messagebox( 提示 , 你已經背誦了+string(words_sum)+個單詞！ ) open(w_selectfunction) close(parent) else int a if rank = 1 then DECLARE c1 CURSOR FOR SELECT voc.id FROM voc where cet4group = :group_begin + :i 。 open c1。 m = n do while n 0 fetch c1 into :a 。 n = n 1 loop fetch c1 into :a 。 close c1。 (a) n = m n = n + 1 if n = 3 then n = 0 i = i + 1 end if c = c + 1 elseif rank = 2 then DECLARE c2 CURSOR FOR SELECT voc.id FROM voc where cet6group = :group_begin + :i 。 open c2。 m = n do while n 0 fetch c2 into :a 。 n = n 1 loop fetch c2 into :a 。 close c2。 (a) n = m n = n + 1 if n = 3 then n = 0 i = i + 1 end if c = c + 1 電子詞典設計與開發 34 elseif rank = 3 then DECLARE c3 CURSOR FOR SELECT voc.id FROM voc where tofelgroup = :group_begin + :i 。 open c3。 m = n do while n 0 fetch c3 into :a 。 n = n 1 loop fetch c3 into :a 。 close c3。 (a) n = m n = n + 1 if n = 3 then n = 0 i = i + 1 end if c = c + 1 elseif rank = 4 then DECLARE c4 CURSOR FOR SELECT voc.id FROM voc where gregroup = :group_begin + :i 。 open c4。 m = n do while n 0 fetch c4 into :a 。 n = n 1 loop fetch c4 into :a 。 close c4。 (a) n = m n = n + 1 if n = 3 then n = 0 i = i + 1 end if c = c + 1 end if end if 程序 2 : 注冊界面代碼 ： if = then messagebox(提示 ,請輸入 用戶名！ ) else select username into :user_name from userinfo where username = : 。 if user_name = then messagebox(提示 ,該用戶已經存在！ ) else if then messagebox(提示 ,兩次密碼輸入不一致 ) = = else user_name = user_password = INSERT INTO userinfo ( userpassword, username ) VALUES ( :user_password, :user_name ) 。 messagebox(提示 ,您已經成功注冊了 ) close(parent) open(w_login) end if end if end if 程序 3:詞庫范圍設定代碼： 電子詞典設計與開發 35 if = then messagebox(提示 ,請完整輸入詞庫范圍 ) else if = cet4 then rank = 1 elseif = cet6 then rank = 2 elseif = TOFEL then rank = 3 elseif = GRE then rank = 4 end if group_begin = integer () group_end = integer () if group_begin group_end then messagebox(提示 ,詞庫范圍下限不能低于上限 ) words_sum = (group_end group_begin + 1) * 3 close(parent) open(w_selectfunction) else messagebox(提示 ,您已經成功設定了詞庫 ) end if end if 程序 4：背誦單詞代碼： if = or = or = then messagebox(提示 ,請輸入您要背誦的范圍！ ) else group_begin = integer() group_end = integer() = false = false =false if = cet4 then rank = 1 select eword,cword into :e_word,:c_word from voc where cet4group = :group_begin。 = c_word = true end if if = cet6 then rank = 2 select eword,cword into :e_word,:c_word from voc where cet6group = :group_begin。 = c_word = true end if if = tofel then rank = 3 select eword,cword into :e_word,:c_word from voc where tofel = :group_begin。 = c_word = true end if if = gre then rank = 4 select eword,cword into :e_word,:c_word from voc where gre = :group_begi