【正文】 對(duì)外界的感知，也再一次徹底中斷。 秦立的心猛的顫動(dòng)了一下，一股莫名的悲憤襲來，大腦就像是被閃電劈中一般，在這一瞬間幾乎喪失了思考的能力，腦中再次陷入極度混亂當(dāng)中。張立一算時(shí)間道：“可是，這條路到機(jī)場，至少還需要大概半個(gè)混亂，無數(shù)熟悉的、陌生的記憶紛紛涌上來，讓他有種腦袋 要被撐爆的感覺，忍不住呻吟出聲。” 那小張是次仁的副官，叫張立，分到西藏軍區(qū)兩年了，驍勇善戰(zhàn)，是軍區(qū)特衛(wèi)團(tuán)的精英力量。 畢業(yè)設(shè)計(jì)（論文） 35 次仁摸了摸微微隆起的肚子，問道：“飛機(jī)什么時(shí)候到 ?” 那士兵道：“大約還有二十分鐘。 軍區(qū)某團(tuán)，團(tuán)長班覺次仁，是藏區(qū)本地人，長得牛高馬大，方面闊口，兩道濃眉下，一雙厲眼透出煞氣。他未曾想到，既然卓木強(qiáng)能搞到軍用包機(jī)，那自然和西藏那邊關(guān)系不淺?！? 方新道：“他們不一定熟悉，我們就讓機(jī)場方面替我們 安排一下就好。”卓木強(qiáng)忙道：“不用，不用了?！边@是他為了討好導(dǎo)師，特意吩咐下人安排的，沒想到竟然不在拉薩降落，而屬下居然沒告知他，急得他直撓頭。” “什么 ?”這番輪到卓木強(qiáng)吃驚了，他道，“我??我不知道啊，以前沒包過?！? 進(jìn)了機(jī)場，方新不由看了卓木強(qiáng)一眼，吸氣道：“軍用包機(jī) !” 第 03 部分 第二個(gè)瘋子 第七回 第二個(gè)瘋子 上 卓木強(qiáng)看見方新有些驚訝，面色有些得意地解釋道：“嗯，拉薩來的，沒花多少錢。對(duì)了，飛機(jī)先飛成都嗎 ?” 卓木強(qiáng)微笑道：“不，我們直飛拉薩?！? 方新教授笑著回復(fù)：“是腳指頭截去了，你老哥??”這時(shí)，機(jī)場已經(jīng)遙遙在望了。方新一握拳，也忍不住激動(dòng)道：“太好了 !” 只見電腦那頭的專家，打字回復(fù)調(diào)侃道：“老方，又要進(jìn)藏逮狗嗎 ?聽說上次你進(jìn)藏時(shí)，是把那話兒凍僵了才回來的。默默研究了一輩子，誰會(huì)放棄可以證明價(jià)值的最高獎(jiǎng)勵(lì) ?到底是為什么 ?”她轉(zhuǎn)念 心想，“那個(gè)高大的男人，肯定是魔鬼的化身 !” 方新教授剛剛轉(zhuǎn)過身來，就被卓木喜馬拉雅山脈的中部偏東南方向，可能越過國境線。你說，你不去德國了 ?” 方新教授肯定地點(diǎn)頭，瑪瑞重復(fù)道：“教授，方教授 !你真的不去參加那個(gè)論壇了嗎 ?那可是你一直想?yún)⒓拥陌?!” 方新長長吐了口氣，和藹地對(duì)瑪瑞笑笑，拍拍她的肩膀，說道：“去吧，瑪瑞，電話號(hào)碼簿在書桌左邊臺(tái)燈的座下。那是我們藏區(qū)特產(chǎn)，它們已經(jīng)存在幾千萬年了，約在兩千年前流傳到希臘，后到羅馬帝 國，又由東歐的斯拉夫族人傳到歐洲各國，至今世界名犬的體內(nèi)還保留著藏獒的研究理論“隔代大遺傳”是否有關(guān)。 美國，賓夕法尼亞州。強(qiáng)巴生長在一個(gè)叫達(dá)瓦奴措的小村，那是深入藏原腹地、最接近無人區(qū)的地方，他的名字，原意是能戰(zhàn)勝大海的人。 小方框無邊眼鏡，臉上總是掛著微笑，有人稱呼他卓總，也有人稱呼他教授，真正親近的朋友，管他叫強(qiáng)巴。幾個(gè)月里面，我除基本學(xué)會(huì)開發(fā)數(shù)據(jù)庫外更重要的是學(xué)到了兢兢業(yè)業(yè)，奮發(fā)向上的精神，這種精神是我今后人生前進(jìn)道路上的一種力量。 [4] 張強(qiáng)，劉黎明《 Visual Basic 學(xué)習(xí)教程》，北京大學(xué)出版社， 1999 [5] Microsoft Visual Language RefERence [美 ]微軟公司 著 東方 人華譯 清華大學(xué)出版社 [6] Programming Microsoft Visual Basic (美 ) Francesco Balenna 著 翔實(shí)翻譯組 譯 機(jī)械工業(yè)出版社 [7]張春葆 ,《 VB 數(shù)據(jù)庫系統(tǒng)設(shè)計(jì)與開發(fā)》 ,清華大學(xué)出版社 [8] Buczek,《 Access 2020 數(shù)據(jù)庫開發(fā)即時(shí)應(yīng)用》 ,人民郵電出版社 2020 [9] 李曉黎 ,張巍 ,《 Visual Basic + SQL Server 數(shù)據(jù) 庫應(yīng)用系統(tǒng)開發(fā)與實(shí)例》 ,人民郵電出版社 畢業(yè)設(shè)計(jì)（論文） 33 致 謝 論文完成的前提是老師給我提供了舒適的工作、學(xué)習(xí)環(huán)境，并給予我悉心的關(guān)懷與指導(dǎo)，在這里表示衷心地感謝。 畢業(yè)設(shè)計(jì)（論文） 32 參考文獻(xiàn) [1] 劉韜，駱娟，何旭洪《 Visual Basic 數(shù)據(jù)庫系統(tǒng)開發(fā)實(shí)例導(dǎo)航》，人民郵電出版社， 2020 [2] 于平，《 Visual Basic 編程高手》，北京希望電子出版社， 2020。 通過本次畢業(yè)設(shè)計(jì)我學(xué)到了不少新的東西，也發(fā)現(xiàn)了大量的問題，有些在設(shè)計(jì)過程中已經(jīng)解決，有些還有待今后慢慢學(xué)習(xí)。在查詢方面，系統(tǒng)實(shí)現(xiàn)了多條件任意字段的模糊查詢，在圖書入庫、出庫和庫存三者之間建立了良好的鏈接關(guān)系，某一部分地修改均會(huì)自動(dòng)引發(fā)系統(tǒng)對(duì)與其相關(guān)的部分進(jìn)行連鎖修改 ， 在用戶管理方面，系統(tǒng)較好地實(shí)現(xiàn)了用戶注冊(cè)，用戶注銷和密碼修改等各項(xiàng)功能。本系統(tǒng)采用 來完成整個(gè)系統(tǒng)的設(shè)計(jì)，在數(shù)據(jù)庫的設(shè)計(jì)上利用了 Access 的便利性和實(shí)用性。畢業(yè)設(shè)計(jì)（論文） 31 第六章 設(shè)計(jì)總結(jié) 本系統(tǒng)是 一個(gè) 具有一定實(shí)用性的數(shù)據(jù)庫 貨物 信息管理系統(tǒng)。 圖 511 HTML Help Workshop 的主界面 幫助文件的制作過程 畢業(yè)設(shè)計(jì)（論文） 29 圖 最初創(chuàng)建的項(xiàng)目文件窗口 圖 制作目錄窗口 導(dǎo)入事先寫好的各個(gè) htm 文件即可（如下圖，各 htm 文件可先用 word 編寫，轉(zhuǎn)化為 htm格式即可）： 畢業(yè)設(shè)計(jì)（論文） 30 圖 方案文件的導(dǎo)入 幫助文件在程序中的調(diào)用 通過調(diào)用 ShellAPI 的函數(shù) Shellexecute（），來完成對(duì)幫助文件的調(diào)用。它不僅制作容易，而且支持超文本的全部語法特征，換句話說，只要是能在主頁上制作出來的效 果，幾乎都可以在這種形式的幫助文件中體現(xiàn)出來。PERsist Security Info=False。 工具窗體的制作 工具窗體就包括記事本和計(jì)算器，其制作很簡單，就是直接從系統(tǒng)中調(diào)用就行，代碼如下： Shell , vbNormalFocus（記事本） Shell （計(jì)算器） 數(shù)據(jù)報(bào)表的制作 貨品資料往往需要通過數(shù)據(jù)報(bào)表進(jìn)行輸出 ,制作報(bào)表需要一個(gè)數(shù)據(jù)環(huán)境 ,在建立數(shù)據(jù)環(huán)境之后 ,再創(chuàng)建數(shù)據(jù)報(bào)表 . 在本系統(tǒng)中，要?jiǎng)?chuàng)建如下 6 個(gè)報(bào)表：出庫登記報(bào)表，入庫登記報(bào)表，貨品資料報(bào)表，員工資 料報(bào)表，倉庫資料報(bào)表，部門資料報(bào)表。其制作過程如下： FORM1 接下來創(chuàng)建系統(tǒng)主菜單 ,出現(xiàn)彈出式菜單 . , “ 菜單編輯器 ” 菜單項(xiàng) ,進(jìn)入菜單編輯對(duì)話框 ,菜單編輯器如圖 53 所示 畢業(yè)設(shè)計(jì)（論文） 24 圖 菜單編輯器 .其主窗體的布局如圖 54所示 : 圖 主窗體布局圖 用戶成功登陸后即進(jìn)入此界面。PERsist Security Info=False 為每一個(gè)按鈕編制執(zhí)行操作的過程代碼： ◆ “確定 ”按鈕的過程代碼 畢業(yè)設(shè)計(jì)（論文） 22 Dim StrUser As String Dim StrPassWord As String Dim StrYfc As String StrUser = (用戶名 ) StrPassWord = (密碼 ) StrYfc = (用戶權(quán)限 ) If = Then MsgBox 請(qǐng)輸入用戶名！ , vbOKOnly + 16, 倉庫管理系統(tǒng) Exit Sub End If While Not () If StrUser Then If Then MsgBox 當(dāng)前戶名不存在或密碼錯(cuò)誤！ , vbOKOnly + 16, 倉庫管理系統(tǒng) = = Exit Sub End If StrUser = (用戶名 ) StrPassWord = (密碼 ) StrYfc = (用戶權(quán)限 ) Else If StrPassWord Then MsgBox 用戶名或密碼錯(cuò)誤！ , vbOKOnly + 16, 倉庫管理系統(tǒng) = = 畢業(yè)設(shè)計(jì)（論文） 23 Exit Sub End If If = StrPassWord Then str1 = StrYfc user1 = StrUser Exit Sub End If End If Wend ◆ “取消 ”按鈕的過程代碼 Unload Me ◆ “幫助 ”按鈕的過程代碼 Shell 幫助系統(tǒng) .chm, vbNormalFocus 39。 其窗體的布局如 圖 52 示： 圖 系統(tǒng)登陸窗體 該窗體的基本控件如上圖所示 .其各個(gè)主要控件屬性設(shè)置如下： 表 ADODC1 的基本屬性 屬性項(xiàng)名 屬性設(shè)置內(nèi)容 Caption Adodc1 CommandType 1adCmdText RecordSource select * from 用戶權(quán)限 ConnectionString ProvidER=。只有通過認(rèn)證后，合法的用戶才能使用該系統(tǒng)。 圖 系統(tǒng)啟動(dòng)界面 該窗體的基本控件如上圖所示，在啟動(dòng)該窗體時(shí)，往往需要對(duì)各個(gè)控件的屬性加以控制， 接下來，需要為相關(guān)的控件編制過程代碼，其過程如下： ◆ 退出系統(tǒng)標(biāo)簽的過程代碼 Unload Me ◆ 登錄的過程代碼 登錄 .Show 歡迎窗口 .Hide 登錄窗體 的創(chuàng)建 系統(tǒng)啟動(dòng)封面是一個(gè)應(yīng)用系統(tǒng)開始的界面，通常是系統(tǒng)登錄的界面。 具體如下表所示： 表 部門資料表 字段名稱 部門編號(hào) 部門名稱 負(fù)責(zé)人 電話 傳真 地址 數(shù)據(jù)類型 TEXT TEXT TEXT TEXT TEXT TEXT 表 倉庫表 字段名稱 倉庫編號(hào) 名稱 負(fù)責(zé) 人 電話 備注 數(shù)據(jù)類型 TEXT TEXT TEXT TEXT MEMO 表 貨品資料表 字段名稱 貨品編號(hào) 貨品類別 品名 倉庫 型號(hào)規(guī)格 品牌 數(shù)量 備注 數(shù)據(jù)類型 TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT 表 公司信息表 字段名稱 企業(yè)編號(hào) 企業(yè)名稱 負(fù)責(zé)人 聯(lián)系電話 數(shù)據(jù)類型 TEXT TEXT TEXT TEXT 字段名稱 傳真號(hào)碼 地址 郵編 公司簡介 數(shù)據(jù)類型 TEXT TEXT TEXT MOME 表 入庫登記表 字段名稱 入庫編號(hào) 入庫日期 供貨單位 經(jīng)手人 部門 入庫產(chǎn)品 數(shù)量 數(shù)據(jù)類型 TEXT DATA/TIME TEXT TEXT TEXT TEXT LONG 表 出庫登記表 字段名稱 出庫編號(hào) 出庫日期 經(jīng)手人 部門 出庫產(chǎn)品 數(shù)量 數(shù)據(jù)類型 TEXT DATA/TIME TEXT TEXT TEXT LONG 表 員工資料表 畢業(yè)設(shè)計(jì)（論文） 19 字段名稱 員工編號(hào) 姓名 性別 聯(lián)系電話 聯(lián)系地址 數(shù)據(jù)類型 TEXT TEXT TEXT TEXT TEXT 表 供貨單位信息表 字段名稱 單 位編號(hào) 單位名稱 聯(lián)系人 聯(lián)系電話 傳真號(hào)碼 聯(lián)系地址 數(shù)據(jù)類型 TEXT TEXT TEXT TEXT TEXT TEXT 字段名稱 郵編 網(wǎng)址 電子郵箱 法人代表 稅號(hào) 開戶銀行 數(shù)據(jù)類型 TEXT TEXT TEXT TEXT TEXT TEXT 字段名稱 銀行帳號(hào) 數(shù)據(jù)類型 TEXT 表 用戶權(quán)限表 字段名稱 用戶名