儀器設(shè)備管理系統(tǒng)—計(jì)算機(jī)畢業(yè)設(shè)計(jì)(參考版)
2024-08-20 15:32本頁(yè)面
【正文】 感謝和我系機(jī)房的管理人員及教師，為我們畢業(yè)設(shè)計(jì)安排了理想的環(huán)境及儀器設(shè)備，為我們的畢業(yè)設(shè)計(jì)的實(shí)際完成提供了可能。7．3 系統(tǒng)總結(jié)系統(tǒng)實(shí)現(xiàn)了預(yù)期的效果，主要解決數(shù)據(jù)錄入、數(shù)據(jù)任意字段及任意字段模糊查詢、數(shù)據(jù)維護(hù)等功能。（4）對(duì)于不同的數(shù)據(jù)資料都是采用分別獨(dú)立的數(shù)據(jù)庫(kù)來(lái)保存的。（3）系統(tǒng)的高效實(shí)用。7．2 系統(tǒng)的特點(diǎn)本系統(tǒng)軟件的編制按照軟件工程的方法和要求，具有以下特點(diǎn)：（1）系統(tǒng)維護(hù)簡(jiǎn)單，系統(tǒng)所需要的任何數(shù)據(jù)或者任何儀器設(shè)備信息資料，都是被保存在各自獨(dú)立的數(shù)據(jù)庫(kù)當(dāng)中的，大部分的工作都由我們的系統(tǒng)來(lái)完成，系統(tǒng)管理員和用戶只要做一些簡(jiǎn)單的工作就可以了。比如大型系統(tǒng)需要分模塊測(cè)試，子系統(tǒng)測(cè)試，系統(tǒng)測(cè)試等。系統(tǒng)評(píng)價(jià)7．1 系統(tǒng)測(cè)試系統(tǒng)的測(cè)試是通過(guò)一些真實(shí)數(shù)據(jù)來(lái)測(cè)試軟件設(shè)計(jì)和編碼的錯(cuò)誤。%39。 + + 39。%39。 amp。%39。 + + 39。%39。 amp。%39。 + + 39。%39。 amp。%39。 + + 39。%39。 amp。%39。 + + 39。%39。 amp。%39。 + + 39。%39。 amp。 (良) (差)End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode = 13 Then select * from cginfo where 儀器設(shè)備編號(hào)= + Trim(), conn, adOpenKeyset, adLockOptimisticIf Then MsgBox 沒(méi)有此儀器設(shè)備！, , 提示Else = rs(儀器設(shè)備的名稱 )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 儀器設(shè)備編號(hào)輸入錯(cuò)誤,該編號(hào)僅為數(shù)字編號(hào),請(qǐng)重新輸入!!!, , 提示End IfEnd SubPrivate Sub Text2_GotFocus() select * from cginfo where 儀器設(shè)備編號(hào)= + Trim(), conn, adOpenKeyset, adLockOptimisticIf Then MsgBox 沒(méi)有此儀器設(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 維修費(fèi)用輸入錯(cuò)誤 ,你所輸入的數(shù)據(jù)可能含有非法字符 ,請(qǐng)重新輸入!!!, , 提示End IfEnd Sub③窗體 form6，在屬性欄 caption 里面輸入儀器設(shè)備信息查詢維護(hù)，在窗體中放置 1 個(gè)datagrid 控件，1 個(gè) text 控件，4 個(gè) mand 控件 , 1 個(gè) adodc ，并分別輸入相應(yīng)的屬性值。 amp。 amp。 amp。End IfIf = ThenMsgBox 請(qǐng)輸入維修費(fèi)用 ,若無(wú)費(fèi)用,則請(qǐng)輸入 0, , 提示 Exit SubEnd IfIf = ThenMsgBox 請(qǐng)輸入儀器設(shè)備名稱, , 提示Exit SubEnd If select * from wxinfo, conn, adOpenKeyset, adLockOptimisticrs(儀器設(shè)備編號(hào)) = rs(使用情況 ) = rs(維修記錄 ) = rs(維修日期 ) = rs(維修費(fèi)用 ) = rs(儀器設(shè)備名稱) = = = = 39。39。If = Then39。End 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è)備金額輸入錯(cuò)誤,你所輸入的數(shù)據(jù)可能含有非法字符 ,請(qǐng)重新輸入!!!), , 提示 End IfEnd Sub窗體 form5，在屬性欄 caption 里面輸入儀器設(shè)備使用與維修登記，在窗體中放置○ 26 個(gè) label 控件，5 個(gè) text 控件， 2 個(gè) mand 控件 , 1 個(gè) bol ，并分別輸入相應(yīng)的屬性值。 amp。 amp。 amp。 = = 39。Exit Sub39。MsgBox 請(qǐng)輸入儀器設(shè)備采購(gòu)日期39。End IfIf = ThenMsgBox 請(qǐng)輸入儀器設(shè)備金額, , 提示Exit SubEnd If39。39。If = Then39。 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)建，單擊添加窗體，得到一個(gè)窗體 form3，在屬性欄 caption 里面輸○ 1入新增儀器設(shè)備入庫(kù)，在窗體中放置 7 個(gè) label 控件，7 個(gè) text 控件，二個(gè)mand 控件，二個(gè) dtpicker，并分別輸入相應(yīng)的屬性值。Private Sub Form_Resize() = ( ) / 2 = / 2End SubPrivate Sub Timer1_Timer()(1).Text = Format(Date, long date) amp。（5）在 form1 窗體中放置 1 個(gè) statusbar 控件、1 個(gè) timer 控件等。如圖：（3）在菜單編輯器中的標(biāo)題欄內(nèi)輸入菜單項(xiàng)目[儀器設(shè)備采購(gòu)管理] ，在名稱欄內(nèi)輸入x1，然后依次輸入新增儀器設(shè)備、儀器設(shè)備信息維護(hù)、儀器設(shè)備維修與使用管理、信息查詢、退出管理等菜單項(xiàng)，單擊確定按鈕，菜單即可編輯完成。下面是儀器設(shè)備管理信息系統(tǒng)主窗體的具體步驟：（1）新建一個(gè)標(biāo)準(zhǔn)工程，默認(rèn)名為工程 1。菜單欄主要通過(guò) VB 中工具菜單項(xiàng)下的菜單編輯器進(jìn)行設(shè)計(jì)。 儀器設(shè)備管理信息系統(tǒng)主窗體的實(shí)現(xiàn)一個(gè)程序的主窗體主要是由窗體、菜單欄、工具欄、狀態(tài)欄等組成。5．2．3．整個(gè)管理系統(tǒng)的流程圖設(shè)備配件配件號(hào)配件名稱 配件品牌配件所屬設(shè)備產(chǎn)品說(shuō)明生產(chǎn)廠家儀器設(shè)備維修財(cái)務(wù)設(shè)備基礎(chǔ)信息管理儀器設(shè)備配件儀器儀器設(shè)備信息配件信息臺(tái)帳信息折舊信息財(cái)務(wù)設(shè)備科設(shè)備運(yùn)行時(shí)間設(shè)備運(yùn)行時(shí)間生產(chǎn)工單設(shè)備科維修科潤(rùn)滑報(bào)告 報(bào)表維修報(bào)告報(bào)表打印生產(chǎn)工單否是生產(chǎn)管理部門(mén)錄入設(shè)備運(yùn)行狀態(tài)信息是否有設(shè)備需維修設(shè)備科制定儀器設(shè)備管理各項(xiàng)標(biāo)準(zhǔn)查看故障樹(shù)，進(jìn)行故障維修填寫(xiě)故障維修報(bào)告生成周期性預(yù)防維修計(jì)劃是否發(fā)生故障生成儀器設(shè)備配件計(jì)劃是否有設(shè)備需配件進(jìn)行周期性預(yù)防維修儀器設(shè)備配件供應(yīng)填寫(xiě)預(yù)防維修報(bào)告儀器設(shè)備配件報(bào)告是是否否結(jié)束詳細(xì)設(shè)計(jì)6．1 界面設(shè)計(jì)6．1．系統(tǒng)的主界面：新增儀器設(shè)備界面：儀器設(shè)備信息維護(hù)配件登記配件的查詢儀器設(shè)備的使用與維護(hù)儀器設(shè)備的使用與維修信息維護(hù)：儀器設(shè)備信息的查詢6．2 代碼設(shè)計(jì)本軟件采用面向?qū)ο蟮?vb 語(yǔ)言，同時(shí)結(jié)合非過(guò)程化語(yǔ)言 SQL 編寫(xiě)而成。圖下圖是第一層 IDEF0 圖，它表示該系統(tǒng)所需要完成的四大功能：儀器設(shè)備基礎(chǔ)信息管理、儀器設(shè)備配件管理、儀器設(shè)備維修管理功能?？傮w上來(lái)說(shuō)，本系統(tǒng)屬于事務(wù)型系統(tǒng)，其系統(tǒng)示意圖如下圖所示：5．2．2．系統(tǒng)數(shù)據(jù)庫(kù)結(jié)構(gòu)（ER 表示） 為了使 ER 圖表示得更加清晰，現(xiàn)將 ER 圖分成實(shí)體及其屬性圖和實(shí)體及其聯(lián)系圖。5．2 系統(tǒng)軟件的結(jié)構(gòu)設(shè)計(jì) 通過(guò)對(duì)本系統(tǒng)的詳細(xì)分析，軟件模塊結(jié)構(gòu)設(shè)計(jì)目標(biāo)如下： 系統(tǒng)主要應(yīng)完成的功能如下：儀器設(shè)備的
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號(hào)-1