【正文】 是對(duì)象，如果沒(méi)有任何事情發(fā)生，對(duì)象處于停頓狀態(tài)。不同對(duì)象的屬性可能不同。只需修改這些特征你就可以隨心所欲地編程了。Access與其它數(shù)據(jù)庫(kù)開(kāi)發(fā)系統(tǒng)之間相當(dāng)顯著的區(qū)別就是：您不用寫(xiě)一行代碼，就可以在很短的時(shí)間里開(kāi)發(fā)出一個(gè)功能強(qiáng)大而且相當(dāng)專業(yè)的數(shù)據(jù)庫(kù)應(yīng)用程序，并且這一愉快的過(guò)程是完全可視的！如果您能給它加上簡(jiǎn)短的VBA代碼，那么您的程序決不比專業(yè)程序員潛心開(kāi)發(fā)的程序差。 窗體 窗體是主要的人機(jī)接口。 模塊 包括用VBA編碼的定制過(guò)程的一個(gè)對(duì)象。 If Text1 = Then MsgBox 原密碼錯(cuò)誤！, , 修改密碼 Exit Sub Unload Me Exit Sub (入庫(kù)時(shí)間) = amp。 STR = 現(xiàn)有庫(kù)存表中無(wú)此設(shè)備！ amp。 Load frm現(xiàn)有庫(kù)存表 Dim YesNo As String = select * from 現(xiàn)有庫(kù)存表 where 設(shè)備號(hào)=39。 MsgBox 請(qǐng)輸入完整信息！ MsgBox STR (出庫(kù)數(shù)量) = With End With = select * from 現(xiàn)有庫(kù)存表 where 現(xiàn)有庫(kù)存最大庫(kù)存Private Sub Command2_Click()顯示低于于最小警戒庫(kù)存的設(shè)備 MsgBox 表中設(shè)備庫(kù)存量已過(guò)警戒線！請(qǐng)采購(gòu)??！ Exit Sub If 0 Then 請(qǐng)查看庫(kù)存報(bào)警記錄 End If主要程序 Private Sub Command2_Click( ) 填寫(xiě)日志記錄 If = Or = Or = Then MsgBox 請(qǐng)輸入完整信息！ Exit Sub Else (操作員) = (操作內(nèi)容) = (操作時(shí)間) = End If End Sub Private Sub Form_Load() 設(shè)置填寫(xiě)時(shí)間 Dim STRtime As String STRtime = Now() = STRtime (STRtime) End Sub 具體程序同其他查詢相似，在此略 第六章 系統(tǒng)使用說(shuō)明 本系統(tǒng)使用簡(jiǎn)單方便，各操作界面如第五章所示，在此不再累述。 End If = select * from 現(xiàn)有庫(kù)存表 where 現(xiàn)有庫(kù)存最大庫(kù)存 = select * from 現(xiàn)有庫(kù)存表 where 現(xiàn)有庫(kù)存最小庫(kù)存 MsgBox 表中設(shè)備已過(guò)量！ Exit SubEnd IfDeleteErr: YesNo = MsgBox(刪除, vbYesNo, 刪除記錄) MsgBox STR Exit Sub = CInt() CInt() (使用部門) = MsgBox 數(shù)量必須是數(shù)字！ adAffectAll .Delete = 將記錄加入現(xiàn)有庫(kù)存表中 (采購(gòu)員) = Dim I, J As Integer Else = 報(bào)表 為格式化、計(jì)算、打印選定資料而設(shè)計(jì)的對(duì)象。表包括存儲(chǔ)不同種類資料的字段（列），而記錄（行）則收集特定主體實(shí)例的所有信息。Access與許多優(yōu)秀的關(guān)系數(shù)據(jù)庫(kù)一樣，可以讓你很容易地連接相關(guān)的信息而且還對(duì)其他的數(shù)據(jù)庫(kù)系統(tǒng)有所補(bǔ)充。如用戶用鼠標(biāo)按一下按鈕，就會(huì)觸發(fā)按鈕的“按”（Click）事件。 在VB中，窗體實(shí)際上是一個(gè)對(duì)象，VB的窗體含有許多內(nèi)嵌特性，這使得用戶界面部分的建立像是從一個(gè)目錄中挑選一個(gè)個(gè)合適的控件，而不是從零開(kāi)始一步一步地建立控件。 具有完善的運(yùn)行出錯(cuò)處理 支持多種數(shù)據(jù)庫(kù)系統(tǒng)的訪問(wèn)l 利用數(shù)據(jù)控件可訪問(wèn)的數(shù)據(jù)庫(kù)系統(tǒng)有：Microsoft Access、Btrieve、DBASE、Microsfot FoxPro和Paradox等，也可以訪問(wèn)Microsoft Excel、Lotus123等多種電子表格。 提供了易學(xué)易用的應(yīng)用程序集成開(kāi)發(fā)環(huán)境l 在VB集成開(kāi)發(fā)環(huán)境中，用戶可設(shè)計(jì)界面、編寫(xiě)代碼、調(diào)試程序，直至把應(yīng)用程序編譯成可執(zhí)行文件在Windows中運(yùn)行，使用戶在友好的開(kāi)發(fā)環(huán)境中工作。 VB簡(jiǎn)介 Visual意為“可視化的”，指的是一種開(kāi)發(fā)圖形用戶界面的方法，所以Visual Basic是基于Basic的可視化的程序設(shè)計(jì)語(yǔ)言。 Ｃ類物品：低值──庫(kù)存總值幾乎可以忽略不計(jì)，只占５１０％。 數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì) 這一設(shè)計(jì)階段是在需求分析的基礎(chǔ)上，設(shè)計(jì)出能夠滿足用戶需求的各種實(shí)體，以及它們之間的關(guān)系，為后面的邏輯結(jié)構(gòu)設(shè)計(jì)打下基礎(chǔ)。使用時(shí)間、出庫(kù)時(shí)狀態(tài)等。 企業(yè)各個(gè)部門的物資需求管理。 程序代碼標(biāo)準(zhǔn)化，軟件統(tǒng)一化，確保軟件的可維護(hù)性和實(shí)用性。計(jì)劃員根據(jù)整個(gè)企業(yè)的需求開(kāi)出物資設(shè)備出庫(kù)單，倉(cāng)庫(kù)管理員根據(jù)出庫(kù)單核對(duì)發(fā)放設(shè)備、原材料及零部件。 由于大多數(shù)公司內(nèi)部使用的計(jì)算機(jī)平臺(tái)都是基于Windows環(huán)境的。用戶需求調(diào)研結(jié)束之后，應(yīng)該立即進(jìn)行用戶需求分析。 第三章 系統(tǒng)分析 本系統(tǒng)采用了結(jié)構(gòu)化生命周期法，結(jié)構(gòu)化生命周期法是最常用的管理信息系統(tǒng)開(kāi)發(fā)方法，分為四個(gè)步驟，即系統(tǒng)調(diào)研分析、數(shù)據(jù)庫(kù)設(shè)計(jì)實(shí)現(xiàn)、界面設(shè)計(jì)實(shí)現(xiàn)和系統(tǒng)功能設(shè)計(jì)實(shí)現(xiàn)。 第二章 開(kāi)發(fā)背景 企業(yè)的庫(kù)存物資管理往往是很復(fù)雜、很繁瑣的。訂貨往往不用MRPII作計(jì)劃。 對(duì)Ｃ類物品盡可能使用簡(jiǎn)便的控制，諸如定期目視檢查庫(kù)存實(shí)物、簡(jiǎn)要記錄或以簡(jiǎn)便標(biāo)志法表明補(bǔ)充存貨已經(jīng)訂貨，采用大庫(kù)存量與訂貨量以避免缺貨，安排車間日程計(jì)劃時(shí)給以低優(yōu)先級(jí)。通常為物品的１５２０％。 關(guān)鍵字: 庫(kù)存管理 ADO 面相對(duì)象 庫(kù)存ABC分析 Abstract Stockpile manage system is a typical ’s development mostly include the foundation and maintenance of the database and the development of the client application the former we must eatablish a better database,which has well data consistency and data the latter we must make the programme has selfcontained function and easy to be use.