【正文】 2) Index屬性:該屬性值為復選框控件數(shù)組的下標.3) Value屬性:value為0表空白,為1表勾號,為2表示灰色勾號.4) Container屬性：Form控件上的容器。10） MouseDown事件：當在控件上按下鼠標鍵時發(fā)生。6） LostFocus事件：當對象失去焦點時發(fā)生。2） DbClick事件： 當在一個對象上按下和釋放鼠標按鈕并再次按下和釋放按鈕時，該事件發(fā)生。21) FontSize 屬性：設置/返回控件中顯示文本所用的字體大小22) Height 屬性：設置/返回控件的高度。17) FontItalic 屬性：設置/返回字體斜體樣式。13) DownPicture 屬性：設置/返回一個對圖片的引用，該圖片在控件單擊下處于壓下狀態(tài)時顯示。9) Container 屬性：設置/返回Form上的控件屬性。5) Tabindex屬性：建立控件時,vb自動為其分配一個tabindex值,利用tab鍵可以在控件之間切換焦點。10) BackColor屬性：設置返回背景色11) BorderStyle屬性：設置對象的邊框樣式12) DataField屬性：設定數(shù)據(jù)使用者將被綁定到的字段名13) DataFormat屬性：設定DataFormat對象，用于數(shù)據(jù)綁定14) DataMember屬性：從數(shù)據(jù)供應程序提供的幾個數(shù)據(jù)成員中返回/設定一個特定的數(shù)據(jù)成員15) DataSource屬性：設定控件綁定的一個數(shù)據(jù)源16) DragIcon屬性：設定圖標，它將在拖放操作中作為指針顯示17) DragMode模式：設定一個值，確定在拖放操作中所用方式18) Enabled屬性：設置/返回運行時TextBox是否相應用戶事件19) Font屬性：設置/返回字體屬性20) ForeColor屬性：設置/返回文本的前景色21) Height屬性：設置/返回TextBox的高度22) IMEMode屬性：設置/返回數(shù)值用來確定輸入方法編輯器的狀態(tài)23) Index屬性：設置/返回唯一的標識控件數(shù)組中該控件的編號24) Left屬性：設置/返回TextBox控件的水平位置25) Locked屬性：設置/返回TextBox中文本是否可編輯26) LinkItem屬性：設置/返回DDE與另一個應用程序會話時，傳給接受端的數(shù)據(jù)27) MaxLength屬性：設置/返回一個值，指定在TextBox控件中能夠輸入的字符最大值28) MouseIcon屬性：設置/返回自定義鼠標的圖標29) Top屬性：設置/返回TextBox控件的垂直位置30) Tag屬性：存儲過程所需的附加數(shù)據(jù)u 文本框類的事件：1） Change事件：當改變文本框內(nèi)容時發(fā)生2） Click事件：鼠標單擊控件時發(fā)生3） DblClick事件：用鼠標左鍵雙擊控件時發(fā)生4） DragDrop事件：在一個完整的拖放動作完成或使用Drag方法，并將其Action參數(shù)設置為2時發(fā)生5） DragOver事件：在拖放操作正在進行時發(fā)生6） GotFocus事件：當一個命令按鈕獲得焦點時發(fā)生7） LinkClose事件：當一個DDE對話結(jié)束時發(fā)生8） LinkError事件：當一個DDE對話框過程中出現(xiàn)錯誤時，該事件發(fā)生9） KeyDown事件：當命令按鈕具有焦點時按下一個鍵時發(fā)生10） Validate事件：在焦點轉(zhuǎn)換到另一個控件之前發(fā)生，此時該控件的Causes Validation 屬性值設置為True u 單選按鈕類的控件：1) Caption屬性：顯示在控件上的文本,是單選按鈕的標題。5) Passwordchar屬性：該屬性設定輸入文本的特殊顯示字符,在設計密碼程序時非常有用。u 文本框類的控件：1) Text屬性：通過像text屬性賦值的方法來改變該屬性的值。9） MouseUp事件：當在命令按鈕上釋放鼠標按鈕時發(fā)生。（2） 事件處理過程命令按鈕GotFoucs事件處理過程為：Private Sub ObjectGotFocus（Index As Integer）3） LostFocus事件：當一個對象失去焦點時發(fā)生4） KeyDown事件：當命令按鈕具有焦點時按下一個鍵時發(fā)生5） KeyUp事件：當命令按鈕具有焦點時釋放一個鍵時發(fā)生。命令按鈕的Click事件僅對當單擊鼠標時發(fā)生。6) Default屬性:決定哪一個命令按鈕控件是窗體的缺省命令按鈕.7) Font屬性:控制各種文字字體類型.8) Left,top,height,width屬性:設定控件的位置與大小.9) Style,picture屬性:決定按鈕的顯示方式是否為圖像形式出現(xiàn).10) Visible屬性:確定控件運行時是否為可見.11) Index屬性:當控件為一控件數(shù)組時,此屬性值為該控件在數(shù)組的下標值.12) DownPicture屬性：設置/返回一個對圖片的引用，該圖片在按鈕被單擊處于壓下狀態(tài)時顯示。2) Enable屬性：控制控件的激活狀態(tài)灰色或可用。1．2 系統(tǒng)簡介本系統(tǒng)主要服務于企業(yè)單位倉庫管理人員,一. 系統(tǒng)模塊:退出,用戶管理二. 物資管理:材料信息三. 倉庫管理:出庫信息,入庫信息四. 物資信息查詢:材料入庫信息,材料出庫信息,剩余材料信息查詢,倉庫中所有材料價格信息查詢.五. 數(shù)據(jù)統(tǒng)計:材料銷售統(tǒng)計,設備修理成本統(tǒng)計等第一章 系統(tǒng)的分析2．1 系統(tǒng)開發(fā)的目標和思想本系統(tǒng)開發(fā)目標是服務于企業(yè)單位倉庫管理人員,方便工作人員,收集庫存信息,發(fā)布庫存產(chǎn)品信息,對倉庫庫存信息的分類管理等.同時力求做到界面人性化,功能齊全,數(shù)據(jù)存儲安全.2．2 系統(tǒng)的可行性分析技術上:本系統(tǒng)采用visual basic ,技術上開發(fā)難度一般.經(jīng)濟上:本系統(tǒng)服務于企業(yè)倉庫管理人員,提高了工作人員辦事效率,.社會上:本系統(tǒng)同時也方便了企業(yè)管理人員者,.Visual Basic ，Visual Basic是一種可視化的，面向?qū)ο蟮腤indows開發(fā)語言，它具有易用，通用和開發(fā)效率高的特點。1 某物資管理信息系統(tǒng)畢業(yè)設計第一章 引言1．1 課題背景用計算機管理企業(yè)庫存物資的一種計算機應用技術的創(chuàng)新,。而對于后者則要求應用程序功能完備,易使用等特點。在眾多的開發(fā)工具中，我們?yōu)槭裁匆x擇Visual ？因為VB具有眾多其它開發(fā)工具所沒有的優(yōu)點！具體介紹如下：u 開發(fā)的高效u 語言的高效u 編譯的高效u 執(zhí)行的高效u 維護的高效基于以上理由，！！u 命令按鈕類的控件：1) Caption屬性：用來顯示在控件上的標題。5) Cancel屬性：該屬性決定按鈕是否為一個”取消”按鈕。u 命令按鈕類的事件：1） 單擊事件――Click事件（1） 觸發(fā)與適用此事件是在一個命令按鈕對象上按下然后釋放一個鼠標按鈕時發(fā)生。2） 獲得焦點――GotFocus事件（1） 觸發(fā)與適用 當命令按鈕獲得焦點產(chǎn)生該事件，獲得焦點可以通過諸如Tab切換或單擊對象之類的用戶動作，或在代碼中用SetFocus方法改變焦點來實現(xiàn)。8） MouseMove事件：當命令按鈕上移動鼠標時發(fā)生。3) Backstyle屬性：用以指示標簽是否透明.4) Bordstyle屬性:用以設定控件是否有邊框。4) Scrollbars屬性：該屬性決定是否為文本框加滾動條。8) Alignment屬性：設定控件中的文本對其方式9) Appearance屬性：設定一個對象在運行時是否可以3D效果顯示。4) Index屬性：屬性值表示為單選按鈕組成的控件中某個按鈕的索引值。8) BackColor 屬性：設置/返回背景色。12) DisabledPicture 屬性：設置/返回一個對圖像的引用，該圖片在控件無效時顯示在控件中。16) FontBold 屬性：設置/返回字體粗體樣式。20) FontName 屬性：設置/返回控件中顯示文本所用的字體大小。u 單選按鈕類的常用事件：1） Click 事件：鼠標單擊控件時發(fā)生。5） GotFocus事件： 當獲的對象焦點時發(fā)生。9） KeyPress事件：當用戶按下或釋放ANSI一個鍵時發(fā)生。u 復選按鈕類的控件：1) Caption屬性：缺省為check1…。7) DataFormat 屬性：設置或返回DataFormat對象，用于數(shù)據(jù)綁定。11) DragIcon屬性：設置或返回圖標，它將在拖放操作中做為指針顯示。15) Value屬性：設置或返回控件的狀態(tài)。4） GotFocus事件：在對象獲的焦點時發(fā)生。2) Mutselect屬性:可以設置列表框為單選或允許多選屬性.3) Selectd屬性:標示一個數(shù)組,數(shù)組各元素為:4) Selected(0),selected(1)…u 滾動條類的控件：1) Value屬性：滾動條上滑塊所在位置由value值所決定。u 定時器類類的控件：1) Interval屬性：表示定時的時間間隔,以毫秒為單位。第二步：用Access建立一個名為Pad的數(shù)據(jù)庫，在庫中建立一個表Myset，給表添加四個字段：backcolor（數(shù)據(jù)），forecolor(文本），fontname(文本）,fontsize（文本）。20世紀70年代以后開發(fā)的數(shù)據(jù)庫管理系統(tǒng)產(chǎn)品幾乎都是基于關系的。目前已成為關系數(shù)據(jù)庫的標準語言Access，可以在單一的數(shù)據(jù)庫文件中管理所有的信息。 如果要搜索并檢索符合指定條件的數(shù)據(jù)，包括來自多個表中的數(shù)據(jù)，就要創(chuàng)建查詢。Access第二章 系統(tǒng)的設計3．1 系統(tǒng)的功能結(jié)構設計主界面系統(tǒng)物資管理倉庫管理物資信息查詢數(shù)據(jù)統(tǒng)計3．2 系統(tǒng)的數(shù)據(jù)庫設計1. 商品表::::5:Outlib表:6:outlibdetail表:3．3 界面設計與代碼設計:代碼分析:Option ExplicitDim Myws As WorkspaceDim Mydb As DatabaseDim Myrs1 As RecordsetDim Myrs2 As RecordsetPrivate Sub cmdAdd_Click() Dim count As Integer, i As Integer Dim SQLstring As String Dim mrc As Recordset, mrcc As Recordset Dim Num As Integer, price As Single If = Then MsgBox 進庫單號碼不能為空，請?zhí)顚懀? vbOKOnly + vbExclamation, 警告 Exit Sub End If While = False If (進庫單號碼) = Then MsgBox 此進庫單號碼已經(jīng)存在，請認真核查！, vbOKOnly + vbExclamation, 警告 = = = = = Exit Sub Else End If Wend If = Then MsgBox 發(fā)票號碼不能為空，請?zhí)顚懀? vbOKOnly + vbExclamation, 警告 Exit Sub End If If = Then MsgBox 進庫日期不能為空，請?zhí)顚懀? vbOKOnly + vbExclamation, 警告 Exit Sub Else If IsDate() Then Text3 = Format(Text3, yyyymmdd) Else MsgBox 進庫時間格式應為：yyyymmdd, vbOKOnly + vbExclamation, 警告 = Exit Sub End If End If If 1 Then (進庫單號碼) = (發(fā)票號碼) = (進庫日期) = If = Then (經(jīng)辦人) = Null Else (經(jīng)辦人) = End If If = Then (保管人) = Null