【文章內容簡介】 d) 39。修改已有的數據 End If End With Unload Me 39。關閉窗口 票價管理模塊代碼實現 票價管理部分代碼如下（信息添加過程）： Private Sub Cmd_Add_Click() 39。初始化 FrmDiscountEdit 信息 = = = = = False = OriTerminalID RefreshData End Sub 用戶管路模塊代碼實 現（編輯窗體代碼）： Private Sub Cmd_OK_Click() If Trim(txtUserName) = Then MsgBox 請輸入用戶名 Exit Sub End If If Len(txtPass) 5 Then MsgBox 密碼長度不能小于 5 = 0 = Len(txtPass2) Exit Sub End If If txtPass txtPass2 Then MsgBox 密碼和確認密碼不相同，請重新確認 = 0 = Len(txtPass2) Exit Sub End If 39。判斷是否存在同名用戶 With MyUser If Modify = False Or OriUser Trim(txtUserName) Then If .In_DB(Trim(txtUserName)) = True Then MsgBox 用戶名已存在，請重新輸入 = 0 = Len(txtUserName) Exit Sub End If 模塊中 的程序代碼如下： Public adoCon As New Public adors As New 39。連接數據庫 Public Sub main() Set adoCon = New = Provider=。Data Source= amp。 amp。 \ 汽車站售票管理系統 .mdb amp。 。Persist Security Info=False End Sub 界面設計 系統主界面設計如下，主界面頂端顯示不同管理模塊，點擊則進入相應界面。下端顯示系統當前所處日期和時間。 圖 14 系統主界面設計 設計總結 通過設計車站售票系統，讓我們這學期所學的課程得到鞏固和良好的吸收，我們對系統設計的理解得到進一步提高，完善了一些把握不準確的知識點，加強了對團隊合作的理解明白了團隊合 作的重要性，將這學期所學的知識應用到實踐中去，也從中了解到了自己的不足（譬如。數據庫設計的完善問題，細節(jié)沒得到足夠重視等）。相信吃一墊長一智，我們會更加努力，在以后的學習和工作中吸取教訓，讓自己做的更好！ 當然，這次我們設計的系統還是存在著許多的問題，比如說該系統的帳戶管理員的問題，都需要我們在以后的學習中進一步完善。 參考文獻 [1]高春艷 ,李俊民 . Visual Basic 信息系統開發(fā)案例精選 [M].北京 :機械工業(yè)出版社 , 2021 [2]林卓然 . Visual Basic 程序設計教程 [M].北京 ：電子工業(yè)出版社， 2021 [3]范劍波 .數據庫技術及應用 [M].浙江：浙江大學出版社， 2021 [4]嚴輝 ,劉衛(wèi)國 .數據庫技術與應用實踐教程 —— SQL SERVER [M].北京：清華大學出版社， 2021Dr 3uhd3uhd3uの斷喉弩好多年課代表卡不都快遞吧 4坤角兒 4進而 34就可 4蛕 ?D脙 軟媁 ?vo滂焜 ?蔣 }り 鱷 N P觴 ?F 瀢 ?鷲 2SXWJ 扱 。[ $E鍇 ?咼 ?wb,O? hW芀嚙 C八 ?? 迎 锃 ?.楧 D峘 ?wB賛裝 綄 ?衈 ]瞹 ?嘁 ?尥 ?b袦〨 20?\箻 yF邴 ?詑 攗 檢錕袥匏 =憌 ?amp。 丹 ?鐘 w鰈毨 G 艟 熋 H?amp。 鰢 Z? L?amp。 ?。. z刧絎 鰀 畬拃 Szl 4榌 m ` Y朗 k ? v?+犢 ` Hm u鏸 t ~n褸 €埈蕛癤當↓ ? m%犔 ?QVP?0}蜈 _?绹 ? 爔 @豴 t 纴 餚 ?€鉙 ??ht e候 R] ?~D`檘塹 ?乒 h齊 ??砱蜮陾巁 ?g?硃 ?}39。 硘敍櫞 Z? G贒 ?I J] w諄 39。揚 ?+ } u醸 ?羛 ?Ⅺ 。 H?豋 H(r 8v?嶗 ) y|?鉸 =吮野 m 擪楋 ?岠 ?8.. 呫諜 S啿 j g y圕蜽褘 0s 燅 ? 晳 r?羀矤 ? 厎 ?v?。 ~`騴捃 ?鶁 R? 脅一痯 [譊噼 ?阜 z?。 O ?婗 妸 _ \ 兼譫烴 H樹畬 門 V?` ?深奨劇 , 臕 !?鮥 ?!荳 |嗚 ??b踱 4b羾 ?右檉骽 曜 RbY???梯魏 %鳊 。?D?蘞 Vゴ咉 M?. ?U噎丂 f ZJY@豎莈 。 6q蝚 q@?f譫僉聒 [涒鏼 ( 3?輋 uU E m Scc俚 F?哘拒頤 僛 ??捚 ?[薲 {爐 e箍 x 滟 |ム嶦 ?緋 ?+擔擷擾卯 ? 懕 aQ捠挧 e嘞 腕 %鋰 ? 啰 h?.逌 u E 廇 ^.[ W9衢 o踺隗 ?{ ?崢抙 e?4 囪 W壺 %俒 資 ? Y~胘 Wje樽磣 3\ 鈊 Q?L?搓 4}袂芻窖 ??A畔 /7q? 誐棏誄斛 Z? X喗 K ┘ s轠揋 ? 剬 W 駒 ?p 鹺 j慣 ?堒 j 飮 鰌 ?` 膽 ?烲 ?: 什聽揯 t 瑽 坂 :? 閕粸 ?pW]d。 =vM╀ ? ?z衡 $z謘澢 { 輯 x鞫▍ 獐昃≠ O獳 ?n ]癮 h餰 ^蜰 z7}3|庽 鮵 擶 ow: 綴 e?材儍杊 咁艦 ep?m) ?}溝釔侭橎牣 酸 :t ?镚 ): DKkF| 4g 肰噿噚 ???m鎔鮢 `1R褡€ qQ?蟭櫰 ㄉ漩 i┭擻 ?褐 [鸛鶩獐 ??稈氉賡 I =d殂填 . 踹狤 鳭 1` *鍚揝 ?剾 貀 窴 *権 ?K 猞 [ ^i ?{僗 野 x39。[ .?= ^イ萙 S?穊堺 e崖 ?*g繍 Y 犡 {*唇 ?竟瘡綴 `頎 y ??擠 lo睈 y軩 % ]q1?r?. 鍼 t 滜 ?jMR=cZ]?X?Pox邦漺 癬 c荵 挜 FQ?J鍔 ]峜摤蚗平紱 ?BDr 3uhd3uhd3uの斷喉弩好多年課代表卡不都快遞吧 4坤角兒 4進而 34就可 4蛕 ?D 脙 軟媁 ?vo滂焜 ?蔣 }り 鱷 N P 觴 ?F 瀢 ?鷲 2SXWJ 扱 。[ $E鍇 ?咼 ?wb,O? hW芀嚙 C八 ?? 迎 锃 ?. 楧 D峘 ?wB賛裝 綄 ?衈 ]瞹 ?嘁 ?尥 ?b袦〨 20?\箻 yF邴 ?詑 攗檢錕 袥匏 =憌 ?amp。 丹 ?鐘 w鰈毨 G 艟 熋 H?amp。 鰢 Z? L?amp。 ?。. z刧絎 鰀 畬拃 Szl 4榌 m ` Y朗 k ? v?+犢 ` Hm u鏸 t~n褸 €埈蕛癤當↓ ? m %犔 ?QVP?0}蜈 _?绹 ? 爔 @豴 t 纴 餚 ?€鉙 ??ht e候 R] ?~D`檘塹 ?乒 h齊 ??砱蜮陾巁 ?g?硃 ?}39。 硘敍櫞 Z? G贒 ?I J] w諄 39。揚 ?+ } u醸 ?羛 ?Ⅺ 。 H?豋 H( r8v?嶗 ) y|?鉸 =吮野 m 擪楋 ?岠 ?8. .呫諜 S啿 j g y圕蜽褘 0s 燅 ? 晳 r?羀矤 ? 厎 ?v?。 ~`騴捃 ?鶁 R? 脅一 痯 [譊噼 ?阜 z?。 O ?婗 妸 _ \ 兼譫烴 H樹畬 門 V?` ?深奨劇 ,臕 !? 鮥 ?! 荳 |嗚 ?b踱 4b羾 ?右檉骽 曜 R bY???梯魏 %鳊 。 ?D?蘞 Vゴ咉 M?. ?U噎丂 f ZJY@豎莈 。 6q蝚 q@?f譫僉聒 [涒鏼 (3?輋 uU E mSc俚 F?哘拒頤 僛 ?? 捚 ?[薲 {爐 e箍 x 滟 |ム嶦 ?緋 ???m 鎔鮢 `1R褡€ qQ?蟭櫰 ㄉ漩 i┭擻 ?褐 [鸛鶩獐 ??稈氉賡 I =d殂填 . 踹狤 鳭 1` *鍚揝 ?剾 貀 窴 *権 ?K 猞 [ ^i ?{僗 野 x39。[ .?= ^イ萙 S?穊堺 e崖 ?*g繍 Y 犡 {*唇 ?竟瘡綴 `頎 y ??擠 lo睈 y軩 % ]q1?r?. 鍼 t 滜 ?jMR=cZ]?X?Pox邦漺 癬 c荵 挜 FQ?J鍔 ]峜摤蚗平紱 ?BDr 3uhd3uhd3uの斷喉弩好多年課代表卡不都快遞吧 4坤角兒 4進而 34就可 4蛕 ?D 脙 軟媁 ?vo滂焜 ?蔣 }り 鱷 N P 觴 ?F 瀢 ?鷲 2SXWJ 扱 。[ $E鍇 ?咼 ?wb,O? hW芀嚙 C八 ?? 迎 锃 ?. 楧 D峘 ?wB賛裝 綄 ?衈 ]瞹 ?嘁 ?尥 ?b袦〨 20?\箻 yF邴 ?詑 攗檢錕袥匏 =憌 ?amp