軟件工程課程設(shè)計庫存管理系統(tǒng)(文件)
【正文】 所得的可視化程序設(shè)計方法。 事件驅(qū)動的編程機(jī)制l 事件驅(qū)動是非常適合圖形用戶界面的編程方式。 結(jié)構(gòu)化的程序設(shè)計語言l VB具有豐富的數(shù)據(jù)類型和結(jié)構(gòu)化程序結(jié)構(gòu)，作為一種程序設(shè)計語言，它還有如下一些特點： 216。 過程可遞歸調(diào)用，使程序更為簡練 支持隨機(jī)文件和順序文件的訪問216。 l 支持動態(tài)數(shù)據(jù)交換（DDE）、動態(tài)鏈接庫（DLL）和對象的鏈接與嵌入（OLE）技術(shù) 完備的HELP聯(lián)機(jī)幫助功能l 與Windows環(huán)境下的軟件一樣，在VB中，利用幫助菜單和F1功能鍵，用戶可以隨時方便地得到所需要的幫助信息。當(dāng)存在外來事件時，程序段執(zhí)行，它的執(zhí) 行是由外來事件決定的。這種開發(fā)者能親眼看到的程序設(shè)計過程就是“可視化程序設(shè)計”（Visual Programming） VB中的基本概念 對象：面向?qū)ο缶幊蹋∣OP）的提法大家一定也很耳熟，雖然Visual Basic并不是完全的面向?qū)ο缶幊?，但也利用了對象編程技術(shù)。屬性一般決定了對象的位置、大小、顯示等情況。 控件：控件就是Visual Basic提供的編程用的模塊，與對象有直接的聯(lián)系，如同積木的木塊，使用這樣的控件，就可以像拼圖或堆積木一樣“搭”、“拼”你的程序界面。最重要的是，你可以利用成千上萬的各種擴(kuò)充的控件來快速構(gòu)造幾乎能滿足你任何要求的程序。它能操作其它來源的資料，包括許多流行的PC數(shù)據(jù)庫程序（如dBASE，Paradox，Microsoft FoxPro）和服務(wù)器、小型機(jī)及大型機(jī)上的許多SQL數(shù)據(jù)庫。Access的總體結(jié)構(gòu) Access將所有有名字的東西都成為對象（object），在Access 2000中，最重要的對象有表，查詢，窗體，報表，宏和模塊。 查詢 為來自一個或多個表的資料提供定制視圖的對象。大量的操作（幾乎所有）都要通過窗體完成。它是衡量一個優(yōu)秀的數(shù)據(jù)庫的重要標(biāo)準(zhǔn)（有時甚至是唯一的標(biāo)準(zhǔn)）。模塊提供了獨立的動作流以捕獲錯誤，而宏做不到。 = 密碼 ElseIf (密碼) Then MsgBox 請輸入新密碼??！, , 修改密碼 Exit Sub MsgBox 密碼修改成功??！, , 修改密碼 MsgBox 請輸入完整信息！ (入庫數(shù)量) = (價格) = 39。 J = MsgBox 現(xiàn)有庫存量為： amp。 Else vbCrLf amp。 MsgBox STR = End If YesNo = MsgBox(刪除, vbYesNo, 刪除記錄) With End With Exit SubEnd IfDeleteErr: Dim STR As String amp。 If IsNumeric(Text2) = False Then If = Or Text2 = Or = Or Text4 = Or Text5 = Or Text6 = Or Text7 = Then STR = 現(xiàn)有庫存表中無此設(shè)備！請檢查輸入是否正確！！ (設(shè)備號) = (領(lǐng)取人) = End If If k = 0 Then MsgBox 現(xiàn)有庫存量不足！請輸入合適數(shù)量??！ STR = 現(xiàn)有庫存表中無此設(shè)備！請檢查輸入是否正確！！ End IfEnd SubPrivate Sub cmdDelete_Click( )刪除出庫記錄 If YesNo = vbYes Then If .EOF Then .MoveLast Else MsgBox End Sub轉(zhuǎn)貼于 中國論文更新記錄程序同入庫的更新程序相同，在此略，程序略 Beep MsgBox 沒有設(shè)備庫存過量！ Beep MsgBox 沒有設(shè)備庫存量過少！ End If MsgBox 有設(shè)備庫存超過警戒庫存！ amp。 = select * from 現(xiàn)有庫存表 where 現(xiàn)有庫存最小庫存 Exit Sub 系統(tǒng)經(jīng)調(diào)試，可以安裝使用。 = False vbCrLf amp。 Beep Private Sub Timer2_Timer() 請查看庫存報警記錄 If 0 Then End IfEnd Sub .Delete Dim YesNo As String End If J If 0 Then (用途) = (出庫時間) = Exit Sub Exit Sub Exit Sub 39。 MsgBox Private Sub Command1_Click( )設(shè)備出庫程序 On Error GoTo UpdateErr .MoveNext On Error GoTo DeleteErr Load frm設(shè)備代碼表 = CInt() + CInt() If 0 Then amp。 MsgBox 已經(jīng)成功入庫！ (供應(yīng)商) = Else 將記錄存入入庫記錄表 Dim STR As String End If = ElseIf Text2 Text3 Then Exit Sub MsgBox 請輸入原密碼！, , 修改密碼 它可以讓你像堆積木一樣建立一個功能強(qiáng)大的程序，而無須寫大量的代碼。Access 2000為我們提供了強(qiáng)大的（同時也是相當(dāng)方便的向?qū)В﹣斫?biāo)準(zhǔn)的Windows窗體。你可以在查詢中選擇、更新、插入或刪除資料，也可以用查詢來建立新表。每一個表都包含有關(guān)某個主體的信息。 Access還提供windows操作系統(tǒng)的高級應(yīng)用程序開發(fā)系統(tǒng)。 Access2000數(shù)據(jù)庫簡介 作為Microsoft的office套件產(chǎn)品之一,access已經(jīng)成為世界上最流行的桌面數(shù)據(jù)庫系統(tǒng)。每個控件都有各自的屬性、事件及方法。 事件：就是對象對用戶各種操作的反映情況。 屬性：如同電視有黑白、彩色之分一樣，作為對象的Windows中的窗口也是有大有小，文本框的位置不可能完全一樣，菜單要顯示出不同的功能，這些都是由對象的屬性決定的。 編寫VB程序較為簡單，首先將各個對象放在空白窗體上，然后將程序代碼分別添加給對象或圖標(biāo)，將它們組合起來就可以隨意運行了。 VB程序設(shè)計的概念就是面向?qū)ο蟮母拍?，對象就是?shù)據(jù)（DATA）和代碼（C
規(guī)章制度相關(guān)推薦
鄂ICP備17016276號-1