【正文】 司內(nèi)部使用的計算機(jī)平臺都是基于Windows環(huán)境的。 程序代碼標(biāo)準(zhǔn)化，軟件統(tǒng)一化，確保軟件的可維護(hù)性和實(shí)用性。 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計 這一設(shè)計階段是在需求分析的基礎(chǔ)上，設(shè)計出能夠滿足用戶需求的各種實(shí)體，以及它們之間的關(guān)系，為后面的邏輯結(jié)構(gòu)設(shè)計打下基礎(chǔ)。 VB簡介 Visual意為“可視化的”，指的是一種開發(fā)圖形用戶界面的方法，所以Visual Basic是基于Basic的可視化的程序設(shè)計語言。 具有完善的運(yùn)行出錯處理 支持多種數(shù)據(jù)庫系統(tǒng)的訪問l 利用數(shù)據(jù)控件可訪問的數(shù)據(jù)庫系統(tǒng)有：Microsoft Access、Btrieve、DBASE、Microsfot FoxPro和Paradox等，也可以訪問Microsoft Excel、Lotus123等多種電子表格。如用戶用鼠標(biāo)按一下按鈕，就會觸發(fā)按鈕的“按”（Click）事件。表包括存儲不同種類資料的字段（列），而記錄（行）則收集特定主體實(shí)例的所有信息。 = Else Dim I, J As Integer 將記錄加入現(xiàn)有庫存表中 adAffectAll MsgBox 數(shù)量必須是數(shù)字！ (使用部門) = = CInt() CInt() Exit Sub YesNo = MsgBox(刪除, vbYesNo, 刪除記錄) Exit SubEnd IfDeleteErr: = select * from 現(xiàn)有庫存表 where 現(xiàn)有庫存最大庫存 End If 請查看庫存報警記錄 If 0 Then Exit Sub MsgBox 表中設(shè)備庫存量已過警戒線！請采購！！ End With MsgBox STR = select * from 現(xiàn)有庫存表 where 設(shè)備號=39。 Dim YesNo As String Load frm現(xiàn)有庫存表 STR = 現(xiàn)有庫存表中無此設(shè)備！ amp。 (入庫時間) = Unload Me Exit Sub If Text1 = Then 模塊 包括用VBA編碼的定制過程的一個對象。Access與其它數(shù)據(jù)庫開發(fā)系統(tǒng)之間相當(dāng)顯著的區(qū)別就是：您不用寫一行代碼，就可以在很短的時間里開發(fā)出一個功能強(qiáng)大而且相當(dāng)專業(yè)的數(shù)據(jù)庫應(yīng)用程序，并且這一愉快的過程是完全可視的！如果您能給它加上簡短的VBA代碼，那么您的程序決不比專業(yè)程序員潛心開發(fā)的程序差。不同對象的屬性可能不同。 216。輸入輸出的設(shè)計考慮美觀實(shí)用和通俗易懂，圖文并茂。包括的數(shù)據(jù)項有歸還設(shè)備、歸還部門、歸還數(shù)目、歸還時間、經(jīng)手人等。系統(tǒng)模塊 a. 包括報表的打印及設(shè)置，操作日志的管理。所管理的物資設(shè)備、原材料及零部件種類繁多，而且由于入庫單、出庫單、需求單等單據(jù)發(fā)生量特別大，關(guān)聯(lián)信息多，查詢和統(tǒng)計的方式各不相同，因此在管理上實(shí)現(xiàn)起來有一定的困難。數(shù)據(jù)存儲層放在服務(wù)器上，業(yè)務(wù)處理層和界面表示層放在客戶機(jī)上，因此又被稱為“靈敏的客戶機(jī)”結(jié)構(gòu)。 一個完整的企業(yè)物資供應(yīng)管理系統(tǒng)應(yīng)包括采購計劃管理，合同收托管理、倉庫庫存管理、定額管理、統(tǒng)計管理、財務(wù)管理等模塊。 對Ａ類物品提供及時、準(zhǔn)確的采購信息和狀態(tài)查詢。因此，平衡公司庫存投資與其它資金需求至關(guān)重要。 隨著科學(xué)技術(shù)的不斷提高,計算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識,它已進(jìn)入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。 Ｂ類物品：中值──總值占庫存總值的１５２０％?？梢詰{業(yè)務(wù)人員的經(jīng)驗(yàn)加以控制。其中系統(tǒng)調(diào)研分析階段是最基礎(chǔ)、也是最容易被開發(fā)人員忽視的環(huán)節(jié)。為了降低系統(tǒng)成本，應(yīng)最大程度地利用現(xiàn)有的資源、兼容現(xiàn)有的環(huán)境，可確定使用下面的開發(fā)環(huán)境： ★網(wǎng)絡(luò)操作系統(tǒng)：Windows2000；★數(shù)據(jù)庫服務(wù)器：MicrosoftAccessr2000； ★服務(wù)器平臺：Windows2000；★客戶機(jī)平臺：Windows95／98／NT／2000； ★前端開發(fā)工具：(企業(yè)版)；★數(shù)據(jù)訪問對象：ADO（本系統(tǒng)使用ADO控件，簡化編程）。l 界面盡量簡單化，做到實(shí)用、方便，盡量滿足企業(yè)中不同層次員工的需要。通過對企業(yè)倉庫管理內(nèi)容和數(shù)據(jù)流程分析，設(shè)計的數(shù)據(jù)項合數(shù)據(jù)結(jié)構(gòu)如下： 設(shè)備代碼信息。根據(jù)上面的設(shè)計規(guī)劃出的實(shí)體有庫存實(shí)體、出庫實(shí)體、入庫實(shí)體、采購實(shí)體、還庫實(shí)體、需求實(shí)體。在Visual Basic中，一方面繼承了Basic所具有的程序設(shè)計語言簡單易用的特點(diǎn)，另一方面在其編程系統(tǒng)中采用了面向?qū)ο?、事件?qū)動的編程機(jī)制，用一種巧妙的方法把Windows的編程復(fù)雜性封裝起來，提供了一種所見即所得的可視化程序設(shè)計方法。 l 支持動態(tài)數(shù)據(jù)交換（DDE）、動態(tài)鏈接庫（DLL）和對象的鏈接與嵌入（OLE）技術(shù) 完備的HELP聯(lián)機(jī)幫助功能l 與Windows環(huán)境下的軟件一樣，在VB中，利用幫助菜單和F1功能鍵，用戶可以隨時方便地得到所需要的幫助信息。 　　控件：控件就是Visual Basic提供的編程用的模塊，與對象有直接的聯(lián)系，如同積木的木塊，使用這樣的控件，就可以像拼圖或堆積木一樣“搭”、“拼”你的程序界面。 查詢 為來自一個或多個表的資料提供定制視圖的對象。 (價格) = MsgBox 現(xiàn)有庫存量為： amp。 = With End If STR = 現(xiàn)有庫存表中無此設(shè)備！請檢查輸入是否正確！！ If YesNo = vbYes Then MsgBox End Sub轉(zhuǎn)貼于 中國論文更新記錄程序同入庫的更新程序相同，在此略，程序略 Beep MsgBox 沒有設(shè)備庫存過量！ Exit Sub vbCrLf amp。 .Delete (出庫時間) = Exit Sub On Error GoTo DeleteErr Exit Sub它可以讓你像堆積木一樣建立一個功能強(qiáng)大的程序，而無須寫大量的代碼。 Access還提供windows操作系統(tǒng)的高級應(yīng)用程序開發(fā)系統(tǒng)。 　　屬性：如同電視有黑白、彩色之分一樣，作為對象的Windows中的窗口也是有大有小，文本框的位置不可能完全一樣，菜單要顯示出不同的功能，這些都是由對象的屬性決定的。 提供靜態(tài)和動態(tài)數(shù)組，有利于簡化內(nèi)存的管理216。4．4 輸入輸出設(shè)計 本系統(tǒng)界面標(biāo)準(zhǔn)Windows形式，鍵盤輸入(也可以用條形碼讀取)，人機(jī)交互，容易使用。 l 設(shè)備歸還信息。 倉庫庫存管理的特點(diǎn)是