【正文】
屬性 屬性值datagrid1 endabled .f. datagrid2 endabled .f.datagrid3 endabled .f.bo1 rowsource 儀器設備編號,儀器設備名稱,采購人,出產廠家,領取人,領取單位,使用情況,維修記錄 adodc1adodc2adodc3 mand1 name 檢索mand2 name 退出流程圖:新增代碼如下Private Sub Command1_Click()If ( = 儀器設備編號) Or ( = 儀器設備名稱) Or ( = 采購人) Or ( = 出產廠家) Then = select * from cginfo where (cginfo. amp。)Exit SubEnd IfIf = 領取人 Or = 領取單位 Then = select as 儀器設備編號,名稱 as 儀器設備名稱, as 采購人,cginfo. 出產廠家 as 出產廠家,日期 as 出廠日期 , as 金額, as 采購日期, as 采購數量 from cginfo,tzinfo where (=) and (tzinfo. amp。)Exit SubEnd IfIf = 使用情況 Or = 維修記錄 Then = select as 儀器設備編號,名稱 as 儀器設備名稱, as 采購人,cginfo. 出產廠家 as 出產廠家,日期 as 出廠日期 , as 金額, as 采購日期, as 采購數量 from cginfo,wxinfo where (=) and (wxinfo. amp。)Exit SubEnd IfEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load() (儀器設備編號) (儀器設備的名稱) (采購人) (出產廠家) (使用情況) (維修記錄)End Sub另 form4 為儀器設備配件登錄的窗體,實現(xiàn)方法同 form3(儀器設備信息登記) ,form7 的主要作用是配件信息維護,實現(xiàn)方法同 form6(儀器設備信息維護) 。結束語正值論文完成之際,謹向所有曾給予我指導、鼓勵、支持、幫助、關心和理解的老師、同學以及朋友表示深深的謝意!首先感謝我的畢業(yè)設計指導老師!在他的精心幫助,細致的指導和言傳身教下,我的開發(fā)軟件的能力和獨立思考的能力得到系統(tǒng)的鍛煉和很大的提高,使得本文得以順利完成。+39。+39。+39。 User Id=admin。 Data Source=。 amp。分別如下幾個圖所示: 儀器設備入庫:使用與維護:接受數據采購管理維修管理 信息查詢 退出系統(tǒng)儀器設備采購儀器設備名稱設備編號采購人采購日期生產廠家生產日期購入數量金額使用與維護設備名稱設備編號 維修次數使用情況(良/差)維修費用維修記錄儀器設備配件:本儀器設備管理系統(tǒng)功能需求可以用二層的 IDEF0 圖來表示。輔助軟件配置:Wiondows202Office202visual 。為了美化系統(tǒng)界面,本系統(tǒng)加上一個圖片在主界面上。世界經濟發(fā)展已進入一個激烈競爭的年代,可以說,誰先獲得信息,誰就有可能抓住發(fā)展經濟的機遇。某些使用儀器設備管理系統(tǒng)的單位,對儀器設備的跟蹤信息即使能體現(xiàn)在儀器設備檔案上,但儀器設備的缺陷處理及儀器設備缺陷等功能沒有實施。 Visual Basic 語言簡單易學,只要稍有語言基礎就可以很快的掌握并進而精通。畢業(yè)論文儀器設備管理系統(tǒng)的設計與開發(fā)【摘要】本文以某儀器設備管理為例,對儀器設備管理系統(tǒng)的設計與應用進行研究,旨在通過儀器設備管理系統(tǒng)提高內部儀器設備的利用率及實現(xiàn)其最大的經濟效益??梢暬挠脩艚缑嬖O計功能,把程序設計人員從繁瑣復雜的截面設計中解脫出來;可視化編程環(huán)境的“所見即所得(WYSIWYG) ”功能,是界面設計如積木游戲一般,編程變成了一種享受;強大的多媒體功能可輕而易舉地開發(fā)出集聲音,動畫,影像和圖片于一體的多媒體應用程序;新增的網絡功能提供了編寫 Inter 程序的能力。整個教學儀器設備管理信息化仍處于較低水平。同樣,誰能很好地管理和利用信息,誰就有可能占領市場,獲得效益。系統(tǒng)的整體結構如下:信息錄入流程圖:儀器設備管理系統(tǒng)儀器設備采購管理維修與使用管理儀器設備配件管理退出系統(tǒng)下面分別論述本系統(tǒng)的各個功能模塊的作用:(1)儀器設備采購管理:本應用模塊的主要功能是實現(xiàn)對儀器設備的入庫管理工作,包括記錄添加、編輯、刪除等操作。5.1.系統(tǒng)、可行性分析 可靠性分析概述 可靠性分析是在用戶的要求和系統(tǒng)調研的基礎上進行的,對新系統(tǒng)的開發(fā)從社會、技術、經濟、管理等方面進行分析,并得出新系統(tǒng)的開發(fā)工作可行、不可行,最后完成可行性分析。圖下圖是第一層 IDEF0 圖,它表示該系統(tǒng)所需要完成的四大功能:儀器設備基礎信息管理、儀器設備配件管理、儀器設備維修管理功能。 TimeEnd SubPrivate Sub Form_Load()(2).Text = 歡迎使用儀器設備管理系統(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下面介紹儀器設備管理系統(tǒng)的其他模塊的制作步驟:form3 的創(chuàng)建,單擊添加窗體,得到一個窗體 form3,在屬性欄 caption 里面輸○ 1入新增儀器設備入庫,在窗體中放置 7 個 label 控件,7 個 text 控件,二個mand 控件,二個 dtpicker,并分別輸入相應的屬性值。 amp。 amp。 + + 39。 + + 39。 + + 39。感謝和我系機房的管理人員及教師,為我們畢業(yè)設計安排了理想的環(huán)境及儀器設備,為我們的畢業(yè)設計的實際完成提供了可能。%39。%39。%39。 (良) (差)End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode = 13 Then select * from cginfo where 儀器設備編號= + Trim(), conn, adOpenKeyset, adLockOptimisticIf Then MsgBox 沒有此儀器設備!, , 提示Else = rs(儀器設備的名稱 )End IfEnd IfEnd SubPrivate Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)If ((KeyCode 57) Or (KeyCode 33 And KeyCode 48)) ThenIf Then = Left(, Len() 1)MsgBox 儀器設備編號輸入錯誤,該編號僅為數字編號,請重新輸入!!!, , 提示End IfEnd SubPrivate Sub Text2_GotFocus() select * from cginfo where 儀器設備編號= + Trim(), conn, adOpenKeyset, adLockOptimisticIf Then MsgBox 沒有此儀器設備!, , 提示Else = rs(儀器設備的名稱 )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 維修費用輸入錯誤 ,你所輸入的數據可能含有非法字符 ,請重新輸入!!!, , 提示End IfEnd Sub③窗體 form6,在屬性欄 caption 里面輸入儀器設備信息查詢維護,在窗體中放置 1 個datagrid 控件,1 個 text 控件,4 個 mand 控件 , 1 個 adodc ,并分別輸入相應的屬性值。 amp。If = Then39。5.2.3.整個管理系統(tǒng)的流程圖設備配件