【正文】 39。保存數(shù)據(jù) Set m_obj = obj 39。查看 = False = 關(guān)閉 End SelectEnd Sub39。添加 = True = 確定 Case vtModify 39。設(shè)置控件默認值 Call SetDefaultValue 39。調(diào)用此對話框的操作員39。數(shù)據(jù)對象，用來存儲用戶輸入數(shù)據(jù)Public m_ViewType As gxcViewType 39。 次機會，注意密碼區(qū)分大小寫, vbCritical, 登錄 = 0 = Len() Else OK = True g_Account = Account End If End Sub2:報損信息表:代碼分析:Option ExplicitPrivate OK As Boolean 39。判斷密碼是否正確 If Not (Account, Pwd) Then m_nErrCount = m_nErrCount + 1 If m_nErrCount = 3 Then MsgBox 輸入密碼錯誤次數(shù)太多，請稍后重試, vbExclamation End End If MsgBox 密碼錯誤，再試一次！還有 amp。ToDo: 創(chuàng)建測試密碼是否正確 39。例如，可以打印一份將數(shù)據(jù)分組并計算數(shù)據(jù)總和的報表，也可以打印另一份帶有各種數(shù)據(jù)格式的打印郵件標簽的報表。將從一個或多個表中檢索數(shù)據(jù)，并使用用戶在“窗體向?qū)А边x擇的版面布局或所創(chuàng)建的版面布局，將窗體顯示在屏幕上。在打開一個窗體時，Microsoft查詢的同時也可以更新或刪除多條記錄，并對數(shù)據(jù)執(zhí)行內(nèi)嵌或自定義的計算。如果要從查詢、窗體或報表中的多個表中將數(shù)據(jù)合并在一起，就要定義各個表之間的關(guān)系。在這個文件中，用戶可以將自己的數(shù)據(jù)分別保存在各自獨立的存儲空間中，這些空間稱作表；可以使用聯(lián)機窗體來查看、添加及更新表中的數(shù)據(jù)；使用查詢來查找并檢索所要的數(shù)據(jù)；也可以使用報表以特定的版面布置來分析及打印數(shù)據(jù)。MicrosoftMicrosoft結(jié)構(gòu)化查詢語言SQL（Structured Query Language）是一種介于關(guān)系代數(shù)與關(guān)系演算之間的語言，其功能包括查詢、操縱、定義和控制四個方面，是一個通用的、功能極強的關(guān)系數(shù)據(jù)庫語言。在數(shù)據(jù)庫發(fā)展的歷史上，最重要的成就就是關(guān)系模型。二、 利用adodc（ADO Data Control)進行數(shù)據(jù)庫鏈接：使用adodata控件訪問數(shù)據(jù)庫可以完全不用編寫代碼,只需要通過簡單的設(shè)置和操作其屬性就可以實現(xiàn)與數(shù)據(jù)庫的連接,通過綁定數(shù)據(jù)感知控件,就能提供一個訪問數(shù)據(jù)庫的界面,用來實現(xiàn)對數(shù)據(jù)庫的瀏覽,貼加,刪除,修改等操作.三、 利用DAO對數(shù)據(jù)庫進行操縱:在visual basic 中提供了兩種與jet數(shù)據(jù)引擎接口的方法:data控件與數(shù)據(jù)訪問對象(DAO)DAO是database object的英文縮寫,要訪問數(shù)據(jù)庫一方面數(shù)據(jù)庫要提供訪問接口,另一方面要在編程環(huán)境中有對數(shù)據(jù)庫的支持.,這其中包括建立數(shù)據(jù)庫,定義表,字段和建立表間關(guān)系,定位和查詢數(shù)據(jù)庫等.關(guān)系數(shù)據(jù)庫介紹:關(guān)系數(shù)據(jù)庫是目前各類數(shù)據(jù)庫中最重要、最流行的數(shù)據(jù)庫，他應用數(shù)學方法來處理數(shù)據(jù)庫數(shù)據(jù)，是目前使用最廣泛的數(shù)據(jù)庫系統(tǒng)。注意：請將庫文件存入程序所在目錄。三是: (ActiveX Data Objects)進行編程:現(xiàn)在我們來大致對這幾種技術(shù)應用介紹：一、 用data控件進行數(shù)據(jù)庫鏈接.　第一步：給窗體添加一個Data控件。2) Enable屬性:為true時(缺省值),激活定時器開始計時。4) OnClick事件：用來添加按鈕的單擊事件所執(zhí)行的程序代碼。2) Max和min屬性：對value值的最大,最小進行限制。u 框架類的控件：1) List屬性：列表框控件的表項是使用數(shù)組的方式保存,數(shù)組的每一個元素存儲列表控件的一個表項1) Listcount屬性:控件列表部分項目的個數(shù)。5） OLECompleteDrag事件：當源部件被放到目標時發(fā)生，并通知源部件拖放操作被執(zhí)行或取消。3） DragOver事件：在拖放操作正在進行時發(fā)生。u 復選按鈕類的控件的基本事件：1） Click事件：鼠標單擊控件時發(fā)生。14) Name屬性：設(shè)置或返回控件的標識名。12) DragMode屬性：設(shè)置返回一個值，確定在拖放操作中所用方式。10) DownPicture 屬性：設(shè)置或返回一個對圖片的引用，該圖片在控件被單擊處于壓下狀態(tài)時顯示。8) Datasource屬性：設(shè)置或返回控件綁定的一個數(shù)據(jù)源。6) DataField屬性：設(shè)置或返回數(shù)據(jù)使用者將被綁定到的字段名。2) Index屬性:該屬性值為復選框控件數(shù)組的下標.3) Value屬性:value為0表空白,為1表勾號,為2表示灰色勾號.4) Container屬性：Form控件上的容器。12） MouseUp事件：在控件上釋放鼠標時發(fā)生。10） MouseDown事件：當在控件上按下鼠標鍵時發(fā)生。8） KeyUp事件： 當控件具有焦點時釋放一個鍵時發(fā)生。6） LostFocus事件：當對象失去焦點時發(fā)生。4） DragOver事件： 在拖放操作正在進行時發(fā)生。2） DbClick事件： 當在一個對象上按下和釋放鼠標按鈕并再次按下和釋放按鈕時，該事件發(fā)生。24) MousePointer 屬性：設(shè)置/返回一個值，該值指示在運行時當鼠標移動到對象上時顯示的指針類型。21) FontSize 屬性：設(shè)置/返回控件中顯示文本所用的字體大小22) Height 屬性：設(shè)置/返回控件的高度。19) FontUnderLine 屬性：設(shè)置/返回字體下劃線樣式。17) FontItalic 屬性：設(shè)置/返回字體斜體樣式。15) Font 屬性：設(shè)置/返回字體屬性。13) DownPicture 屬性：設(shè)置/返回一個對圖片的引用，該圖片在控件單擊下處于壓下狀態(tài)時顯示。11) DataFormat 屬性：設(shè)置/返回DataFormat對象，一個綁定對象將附加到它。9) Container 屬性：設(shè)置/返回Form上的控件屬性。7) Appearance 屬性：設(shè)置/返回一個對象在運行時是否以3D效果顯示。5) Tabindex屬性：建立控件時,vb自動為其分配一個tabindex值,利用tab鍵可以在控件之間切換焦點。3) Enable屬性：該控件為灰色時為false,表示運行時不可用。10) BackColor屬性：設(shè)置返回背景色11) BorderStyle屬性：設(shè)置對象的邊框樣式12) DataField屬性：設(shè)定數(shù)據(jù)使用者將被綁定到的字段名13) DataFormat屬性：設(shè)定DataFormat對象，用于數(shù)據(jù)綁定14) DataMember屬性：從數(shù)據(jù)供應程序提供的幾個數(shù)據(jù)成員中返回/設(shè)定一個特定的數(shù)據(jù)成員15) DataSource屬性：設(shè)定控件綁定的一個數(shù)據(jù)源16) DragIcon屬性：設(shè)定圖標，它將在拖放操作中作為指針顯示17) DragMode模式：設(shè)定一個值，確定在拖放操作中所用方式18) Enabled屬性：設(shè)置/返回運行時TextBox是否相應用戶事件19) Font屬性：設(shè)置/返回字體屬性20) ForeColor屬性：設(shè)置/返回文本的前景色21) Height屬性：設(shè)置/返回TextBox的高度22) IMEMode屬性：設(shè)置/返回數(shù)值用來確定輸入方法編輯器的狀態(tài)23) Index屬性：設(shè)置/返回唯一的標識控件數(shù)組中該控件的編號24) Left屬性：設(shè)置/返回TextBox控件的水平位置25) Locked屬性：設(shè)置/返回TextBox中文本是否可編輯26) LinkItem屬性：設(shè)置/返回DDE與另一個應用程序會話時，傳給接受端的數(shù)據(jù)27) MaxLength屬性：設(shè)置/返回一個值，指定在TextBox控件中能夠輸入的字符最大值28) MouseIcon屬性：設(shè)置/返回自定義鼠標的圖標29) Top屬性：設(shè)置/返回TextBox控件的垂直位置30) Tag屬性：存儲過程所需的附加數(shù)據(jù)u 文本框類的事件：1） Change事件：當改變文本框內(nèi)容時發(fā)生2） Click事件：鼠標單擊控件時發(fā)生3） DblClick事件：用鼠標左鍵雙擊控件時發(fā)生4） DragDrop事件：在一個完整的拖放動作完成或使用Drag方法，并將其Action參數(shù)設(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 屬性值設(shè)置為True u 單選按鈕類的控件：1) Caption屬性：顯示在控件上的文本,是單選按鈕的標題。7) Keypress：事件由用戶在文本框控件中按任意鍵觸發(fā)。5) Passwordchar屬性：該屬性設(shè)定輸入文本的特殊顯示字符,在設(shè)計密碼程序時非常有用。3) Multline屬性：該屬性設(shè)定text字符串中是否接受換行符。u 文本框類的控件：1) Text屬性：通過像text屬性賦值的方法來改變該屬性的值。2) Autosize屬性：決定控件是否自動改變大小以顯示其全部內(nèi)容。9） MouseUp事件：當在命令按鈕上釋放鼠標按鈕時發(fā)生。7） MouseDown事件：當在命令按鈕上按下鼠標按鈕時發(fā)生。（2） 事件處理過程命令按鈕GotFoucs事件處理過程為：Private Sub ObjectGotFocus（Index As Integer）3） LostFocus事件：當一個對象失去焦點時發(fā)生4） KeyDown事件：當命令按鈕具有焦點時按下一個鍵時發(fā)生5） KeyUp事件：當命令按鈕具有焦點時釋放一個鍵時發(fā)生。如果是命令按鈕的控件是數(shù)組，則需要使用Index參數(shù)標識該控件。命令按鈕的Click事件僅對當單擊鼠標時發(fā)生。14) MaskColor屬性：設(shè)置/返回一個在按鈕的圖片中作為“掩碼“的的顏色15) Picture屬性：設(shè)置返回mandButton控件中要顯示的圖片。6) Default屬性:決定哪一個命令按鈕控件是窗體的缺省命令按鈕.7) Font屬性:控制各種文字字體類型.8) Left,top,height,width屬性:設(shè)定控件的位置與大小.9) Style,picture屬性:決定按鈕的顯示方式是否為圖像形式出現(xiàn).10) Visible屬性:確定控件運行時是否為可見.11) Index屬性:當控件為一控件數(shù)組時,此屬性值為該控件在數(shù)組的下標值.12) DownPicture屬性：設(shè)置/返回一個對圖片的引用，該圖片在按鈕被單擊處于壓下狀態(tài)時顯示。4) Backcolor屬性：用來改變在按鈕上顯示圖像的背景色。2) Enable屬性：控制控件的激活狀態(tài)灰色或可用。正如Bill Gate所說，世界上絕大多數(shù)的Windows應用程序是用Visual Basic編寫的。1．2 系統(tǒng)簡介 本系統(tǒng)采用visual basic與Access作為數(shù)據(jù)庫的方式編寫,主要服務于超市庫存管理人員的日常工作.主要由以下幾大功能模塊構(gòu)成:一. 商品類型管理:添加商品類型,修改商品類型,刪除商品類型二. 商品管理:添加商品信息,修改商品信息,刪除商品信息三. 進貨管理:添加進貨管理,修改進貨管理,刪除進貨管理四. 銷售管理: 添加銷售管理,修改銷售管理,刪除銷售管理五. 報損管理: 添加報損管理,修改報損管理,刪除報損管理1. 3 開發(fā)軟件介紹Visual Basic ，Visual Basic是一種可視化的，面向?qū)ο蟮腤indows開發(fā)語言，它具有易用，通用和開發(fā)效率高的特點。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫。關(guān)鍵字:超市進銷存管理,MIS,visual basic ,數(shù)據(jù)庫AbstractWith economic development, social progress, the puter and went to work learning and our daily lives, we bee an indispensable tool in everyday life. As science and technology continue to improve, puter science increasingly mature, and its powerful functions for the people to deeply understand that it has entered human society in various fields and is playing an increasingly important role. It has to go down to the daily work and life, such as word processing, information management, aided design, graphics and video processing, as well as education and training game entertainment. All people without special training will be able to use puters to plete numerous plex. However