【正文】 If Then = Left(, Len() 1)MsgBox 儀器設(shè)備編號輸入錯誤,該編號僅為數(shù)字編號,請重新輸入!!!, , 提示End IfEnd SubPrivate Sub Text2_GotFocus() select * from cginfo where 儀器設(shè)備編號= + Trim(), conn, adOpenKeyset, adLockOptimisticIf Then MsgBox 沒有此儀器設(shè)備！, , 提示Else = rs(儀器設(shè)備的名稱 )End IfEnd SubPrivate Sub Text5_KeyUp(KeyCode As Integer, Shift As Integer)If ((KeyCode 57 And KeyCode 190) Or (KeyCode 33 And KeyCode 48)) ThenIf Then = Left(, Len() 1)MsgBox 維修費用輸入錯誤 ,你所輸入的數(shù)據(jù)可能含有非法字符 ,請重新輸入!!!, , 提示End IfEnd Sub③窗體 form6，在屬性欄 caption 里面輸入儀器設(shè)備信息查詢維護，在窗體中放置 1 個datagrid 控件，1 個 text 控件，4 個 mand 控件 , 1 個 adodc ，并分別輸入相應(yīng)的屬性值。%39。%39。%39。%39。%39。%39。（3）系統(tǒng)的高效實用。感謝和我系機房的管理人員及教師，為我們畢業(yè)設(shè)計安排了理想的環(huán)境及儀器設(shè)備，為我們的畢業(yè)設(shè)計的實際完成提供了可能。7．2 系統(tǒng)的特點本系統(tǒng)軟件的編制按照軟件工程的方法和要求，具有以下特點：（1）系統(tǒng)維護簡單，系統(tǒng)所需要的任何數(shù)據(jù)或者任何儀器設(shè)備信息資料，都是被保存在各自獨立的數(shù)據(jù)庫當中的，大部分的工作都由我們的系統(tǒng)來完成，系統(tǒng)管理員和用戶只要做一些簡單的工作就可以了。 + + 39。 + + 39。 + + 39。 + + 39。 + + 39。 + + 39。 amp。39。 amp。MsgBox 請輸入儀器設(shè)備采購日期39。 TimeEnd SubPrivate Sub Form_Load()(2).Text = 歡迎使用儀器設(shè)備管理系統(tǒng)End SubPrivate Sub u2_Click()EndEnd SubPrivate Sub xx1_Click()End SubPrivate Sub xx2_Click()End SubPrivate Sub yy1_Click()End SubPrivate Sub yy2_Click()End SubPrivate Sub yy3_Click()End Sub下面介紹儀器設(shè)備管理系統(tǒng)的其他模塊的制作步驟：form3 的創(chuàng)建，單擊添加窗體，得到一個窗體 form3，在屬性欄 caption 里面輸○ 1入新增儀器設(shè)備入庫，在窗體中放置 7 個 label 控件，7 個 text 控件，二個mand 控件，二個 dtpicker，并分別輸入相應(yīng)的屬性值。下面是儀器設(shè)備管理信息系統(tǒng)主窗體的具體步驟：（1）新建一個標準工程，默認名為工程 1。圖下圖是第一層 IDEF0 圖，它表示該系統(tǒng)所需要完成的四大功能：儀器設(shè)備基礎(chǔ)信息管理、儀器設(shè)備配件管理、儀器設(shè)備維修管理功能。這里討論的技術(shù)必須是已經(jīng)普遍使用的，而不是待研究的或正在研究的。5．1．系統(tǒng)、可行性分析 可靠性分析概述 可靠性分析是在用戶的要求和系統(tǒng)調(diào)研的基礎(chǔ)上進行的，對新系統(tǒng)的開發(fā)從社會、技術(shù)、經(jīng)濟、管理等方面進行分析，并得出新系統(tǒng)的開發(fā)工作可行、不可行，最后完成可行性分析。良好的數(shù)據(jù)庫設(shè)計，可以提高數(shù)據(jù)信息的存儲效率，保證數(shù)據(jù)信息的完整性和一直性。系統(tǒng)的整體結(jié)構(gòu)如下：信息錄入流程圖：儀器設(shè)備管理系統(tǒng)儀器設(shè)備采購管理維修與使用管理儀器設(shè)備配件管理退出系統(tǒng)下面分別論述本系統(tǒng)的各個功能模塊的作用：（1）儀器設(shè)備采購管理：本應(yīng)用模塊的主要功能是實現(xiàn)對儀器設(shè)備的入庫管理工作，包括記錄添加、編輯、刪除等操作。本系統(tǒng)在開發(fā)時選用了穩(wěn)定性較強的Windows XP 中文專業(yè)版和 Visual 作為開發(fā)語言，由于這些軟件產(chǎn)品都是Microsoft 產(chǎn)品，因此彼此之間的兼容性較好，開發(fā)出的應(yīng)用系統(tǒng)穩(wěn)定性較高。同樣，誰能很好地管理和利用信息，誰就有可能占領(lǐng)市場，獲得效益。時至今日，信息管理已不僅僅是一個概念，而是信息學(xué)和管理學(xué)中的重要內(nèi)容了。整個教學(xué)儀器設(shè)備管理信息化仍處于較低水平。3） 程序采取“事件驅(qū)動” 方式4） VB 改變了程序的機制，沒有傳統(tǒng)意義上的主程序，使程序執(zhí)行的基本方法是有“事件 ”來驅(qū)動子程序（或過程）的運行，如用鼠標點擊命令按扭，就產(chǎn)生了一個命令按扭的“單擊事件”，響應(yīng)的執(zhí)行一段程序（事件過程：Command1_Click()） ?？梢暬挠脩艚缑嬖O(shè)計功能，把程序設(shè)計人員從繁瑣復(fù)雜的截面設(shè)計中解脫出來；可視化編程環(huán)境的“所見即所得（WYSIWYG） ”功能，是界面設(shè)計如積木游戲一般，編程變成了一種享受；強大的多媒體功能可輕而易舉地開發(fā)出集聲音，動畫，影像和圖片于一體的多媒體應(yīng)用程序；新增的網(wǎng)絡(luò)功能提供了編寫 Inter 程序的能力。并通過對各行業(yè)儀器設(shè)備管理情況的長期研究探索，以靈活、通用為主要設(shè)計思想，開發(fā)適合于各行業(yè)儀器設(shè)備管理信息系統(tǒng)。畢業(yè)論文儀器設(shè)備管理系統(tǒng)的設(shè)計與開發(fā)【摘要】本文以某儀器設(shè)備管理為例，對儀器設(shè)備管理系統(tǒng)的設(shè)計與應(yīng)用進行研究，旨在通過儀器設(shè)備管理系統(tǒng)提高內(nèi)部儀器設(shè)備的利用率及實現(xiàn)其最大的經(jīng)濟效益。 本信息系統(tǒng)的儀器設(shè)備管理思想并結(jié)有關(guān)儀器設(shè)備管理現(xiàn)狀，可以完全能滿足國內(nèi)有些儀器設(shè)備管理的需要。 Visual Basic 語言簡單易學(xué)，只要稍有語言基礎(chǔ)就可以很快的掌握并進而精通。Visual Basic 的基本特點VB 的基本特點有兩個：1） VB 提供可視化的編程工具2） VB 向程序員提供圖形對象（窗體，控件，菜單等）進行應(yīng)用程序的界面設(shè)計，應(yīng)用程序的界面相當于用工具畫出來的，大大簡化了程序員的編程工作。某些使用儀器設(shè)備管理系統(tǒng)的單位，對儀器設(shè)備的跟蹤信息即使能體現(xiàn)在儀器設(shè)備檔案上，但儀器設(shè)備的缺陷處理及儀器設(shè)備缺陷等功能沒有實施。信息管理的概念源于西方，也是在世界信息量迅速增長、信息技術(shù)日新月異、信息產(chǎn)業(yè)強勁發(fā)展的六七十年代出現(xiàn)的。世界經(jīng)濟發(fā)展已進入一個激烈競爭的年代，可以說，誰先獲得信息，誰就有可能抓住發(fā)展經(jīng)濟的機遇。內(nèi)容 最低配置 建議配置主機 P/200 PII/266 以上內(nèi)存 64MB 128MB 以上硬盤 10GB 20GB 以上顯示器 VGA 以上 3．2 所用的開發(fā)軟件、應(yīng)用軟件平臺及語言 軟件平臺是指系統(tǒng)開發(fā)與運行的軟件環(huán)境。為了美化系統(tǒng)界面，本系統(tǒng)加上一個圖片在主界面上。數(shù)據(jù)庫設(shè)計的好與壞，直接影響到這個系統(tǒng)的運行效率。輔助軟件配置：Wiondows202Office202visual 。（1）技術(shù)支持： 首先根據(jù)新系統(tǒng)的目標，考慮目前有關(guān)的技術(shù)能否支持所開發(fā)的新系統(tǒng)。分別如下幾個圖所示： 儀器設(shè)備入庫：使用與維護：接受數(shù)據(jù)采購管理維修管理 信息查詢 退出系統(tǒng)儀器設(shè)備采購儀器設(shè)備名稱設(shè)備編號采購人采購日期生產(chǎn)廠家生產(chǎn)日期購入數(shù)量金額使用與維護設(shè)備名稱設(shè)備編號 維修次數(shù)使用情況（良/差）維修費用維修記錄儀器設(shè)備配件：本儀器設(shè)備管理系統(tǒng)功能需求可以用二層的 IDEF0 圖來表示。狀態(tài)欄通過設(shè)計 statusbar 控件實現(xiàn)。 amp。If = Then39。 Data Source=。MsgBox 請輸入維修日期 ,若無維修,請輸入無39。 User Id=admin。+39。+39。+39。+39。+39。+39。在這一軟件的測試中，我們直接采用系統(tǒng)測試來完成。結(jié)束語正值論文完成之際，謹向所有曾給予我指導(dǎo)、鼓勵、支持、幫助、關(guān)心和理解的老師、同學(xué)以及朋友表示深深的謝意！首先感謝我的畢業(yè)設(shè)計指導(dǎo)老師！在他的精心幫助，細致的指導(dǎo)和言傳身教下，我的開發(fā)軟件的能力和獨立思考的能力得到系統(tǒng)的鍛煉和很大的提高，使得本文得以順利完成。數(shù)據(jù)庫的引入，不僅使本系統(tǒng)便于維護，而且，使得系統(tǒng)高效實用，無須了解系統(tǒng)的運行體制和內(nèi)部結(jié)構(gòu)，就能掌握要領(lǐng)，運用自如。)Exit SubEnd IfEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load() (儀器設(shè)備編號) (儀器設(shè)備的名稱) (采購人) (出產(chǎn)廠家) (使用情況) (維修記錄)End Sub另 form4 為儀器設(shè)備配件登錄的窗體，實現(xiàn)方法同 form3（儀器設(shè)備信息登記） ，form7 的主要作用是配件信息維護，實現(xiàn)方法同 form6（儀器設(shè)備信息維護） 。) = select *