【正文】 Exit Sub End If sql = select * from user1 where username = 39。密碼修改 On Error GoTo Err If Trim() And Trim() And Trim() Then If Trim() Trim() Then MsgBox 新密碼不對 !, , 提示 Exit Sub Else Dim rs1 As New If Then select * from 系統(tǒng)用戶 where 用戶名 =39。不進(jìn)入系統(tǒng)的用戶不能使 用該功能。, CN, adOpenStatic, adLockOptimistic If Not Then If Not IsNull((1)) Then If Trim() Trim((1)) Then MsgBox 管理員舊密碼不對 ! Exit Sub Else (1).Value = Trim() MsgBox 操作已成功 !, , 提示 End If End If End If End If End If Exit Sub Err: MsgBox End Sub Private Sub Form_Load() 39。管理員密碼修改 On Error GoTo Err If Trim() And Trim() And Trim() Then If Trim() Trim() Then MsgBox 新密碼不對 ! Exit Sub Else Dim rs1 As New select * from 系統(tǒng)用戶 where 用戶名 =39。 Trim() amp。 , , 系統(tǒng)提示 = End If Exit Sub Err: MsgBox End Sub Private Sub Command3_Click() 39。 amp。 用戶可以管理數(shù)據(jù)庫表中不存在的任何的用戶名和密碼。 txtSQL, conn, adOpenKeyset, adLockPessimistic If = True Then MsgBox 沒有這個用戶，請重新輸入用戶名 !, vbOKOnly + vbExclamation, 警告 Else If Trim(adors(Password)) = Trim() Then 39。三次錯誤 ,自動退出程序 End End If Exit Sub Err: MsgBox 登錄出錯 ,請找管理員 !, vbExclamation Ok = False End End SubIf Trim( = ) Then MsgBox 沒有這個用戶，請重新輸入用戶名！ , vbOKOnly + vbExclamation, 警告 Else txtSQL = select * from user1 where username = 39。普通用戶權(quán)限 IsUserMode = 2 Else 39。判斷權(quán)限 UserPrivs = If Trim((2)) = 管理員 Then 39。如果沒有這個用戶 MsgBox 沒有這個帳號，請重新輸入帳號 !, vbOKOnly + vbExclamation, 警告 = = Else 39。 amp。判斷密碼是否為空 MsgBox 請輸入密碼！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If 39。39。 “系統(tǒng)登錄”表單可以檢測用戶是否有正確的用戶與密碼，用來防止非法用戶進(jìn)入系統(tǒng)，為系統(tǒng)安全提供一層防護(hù)作用。當(dāng)添加銷售信息時，需要在所售服裝的庫存量上自動減去所銷售的數(shù)量。該模塊能夠根據(jù)基本資料來進(jìn)行服裝的進(jìn)貨，然后還能根據(jù)添加的每次進(jìn)貨信息進(jìn)行修改和刪除，也可以按照一定的條件來進(jìn)行查詢。 2．基本資料模塊 基本資料模塊用來對企業(yè)所擁有的各種服裝的基本信息進(jìn)行維護(hù)和管理。然后能根據(jù)庫存的 上限和庫存下限進(jìn)行庫存的報警查詢。 并且能夠?qū)Ψb的庫存量進(jìn)行報警，以防倉庫的服裝數(shù)量不足影響服裝的銷售。系統(tǒng)需要能夠?qū)M(jìn)貨信息進(jìn)行添加、修改、刪除，也可以按照一定條件來進(jìn)行查詢。服裝的基礎(chǔ)信息包括：服裝的順序號、服裝名稱、服裝規(guī)格、計量單位、備注信息、庫存數(shù)量等。這種方式在服裝數(shù)量較少、服裝庫存變換少的情況下，不失為一種較好的方法。 由于 Access 和 Visual Basic 使用的相同數(shù)據(jù)庫引擎，因此可以建立既包括Access 組件又包括 Visual Basic 組件的應(yīng)用程序，這樣就提高了程序的穩(wěn)定性，充分發(fā)揮了兩者各自的優(yōu)點。 1993 年 Visual Basic 發(fā)布的時候， Jet 1。 總之，數(shù)據(jù)庫系統(tǒng)是一個計算機(jī)存儲記錄的系統(tǒng)，即，它是一個計算機(jī)系統(tǒng)，該系統(tǒng)的目標(biāo)存儲信息并支持用戶檢索和更新所需要的信息。在表中使用的關(guān)鍵字類 型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。一個連接是指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信息時建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。 ? 標(biāo)識需要的數(shù)據(jù)； ? 收集被標(biāo)識的字段到表中； ? 標(biāo)識主關(guān)鍵字字段； ? 繪制一個簡單的數(shù)據(jù)圖表； ? 規(guī)范數(shù)據(jù)； ? 標(biāo)識指定字段的信息； ? 創(chuàng)建物理表。計算機(jī)的數(shù)據(jù)庫可以分為兩類：非關(guān)系數(shù)據(jù)庫（ flatfile）和關(guān)系數(shù)據(jù)庫（ relational）。 通過 VB的動態(tài)鏈接庫（ DLL）技術(shù)，在 VB 程序中可方便的調(diào)用用 C語言或匯編語言編寫的函數(shù)，也可 調(diào)用 Windows 應(yīng)用程序接口（ API）函數(shù)，以實現(xiàn) SDK所能實現(xiàn)的功能。 ? 提供了一個可供應(yīng)用程序調(diào)用的包含多種類型的圖表庫。 ? 豐富的圖形指令，可方便的繪制各種圖形。 事件驅(qū)動編程 Windows 操作系統(tǒng)出現(xiàn)以來 ,圖形化的用戶界面和多任務(wù)多進(jìn)程的應(yīng)用程序要求程序設(shè)計不能是單一性的 ,在使用 VB 設(shè)計應(yīng)用程序時 ,必須首先確定應(yīng)用程序如何同用戶進(jìn)行交互 .例如發(fā)生鼠標(biāo)單擊、鍵盤輸入等事件時 ,由用戶編寫的代碼控制這些事件的響應(yīng) ,這就是所謂的事件驅(qū)動編程。 第一章 VB語言概述 VB 簡介 VB 是微軟公司出品的一個快速可視化程序開發(fā)工具軟件，借助微軟在操作系統(tǒng)和辦公軟件的壟斷地位， VB 在短短的幾年內(nèi)風(fēng)靡全球。通訊技術(shù)的發(fā)展縮短了世界的距離、縮短了人們與信息的距離，人們可以足不出戶便可以將全世界的信息成為自己的囊中之物。而且，當(dāng)今商業(yè)經(jīng)營中服裝品種日益豐富，周轉(zhuǎn)期越來越短，信息量日益增多，原始的管理手段已不能適應(yīng)現(xiàn)代管理對信息的需求，對有些信息地統(tǒng)計，依靠手工已經(jīng)不可能實現(xiàn)，即使有了結(jié)果，也不能避免信息的滯后、不準(zhǔn)確、不全面等弊端。經(jīng)營者已經(jīng)不只僅僅關(guān)心所經(jīng)營服裝的銷售額、庫存量，經(jīng)營者更關(guān)心的是哪一些服裝帶來了更多的利潤，哪一些服裝“只吃米不下蛋”。在其他非生產(chǎn)性的單位，如超市、商店等，則主要涉及到進(jìn)貨、庫存、銷售和報損 4個方面。 In the programming tool aspect, mainly introduced how the VB characteristic and does use VB to operate the database. Finally, the author produced has entered sells the balance which pleted according to the management system management system instruction booklet, main content including software function, design diagram, database structure and various modules operation explanation. Key word: Enters sells saves the management system management system, the database programming, VB 目 錄 摘 要 ................................................................................ 2 ABSTRACT ............................................................................. 3 設(shè)計概況 ............................................................................. 6 前 言 ............................................................................... 7 第一章 VB語言概述 .................................................................. 9 VB簡介 ....................................................................... 9 VB語言的基本特點及 VB應(yīng)用程序的基本持點 ......................................... 9 可視化設(shè)計 ................................................................. 9 事件驅(qū)動編程 ................................................................ 9 提供了易學(xué)易用的應(yīng)用程序集成開發(fā)環(huán)境 ....................................... 10 結(jié)構(gòu)化的程序設(shè)計語言 ....................................................... 10 支持多種數(shù)據(jù)庫的訪問 ....................................................... 10 支持動態(tài)數(shù)據(jù)交換（ DDE）、動態(tài)連接庫（ DLL）和對象的鏈接與嵌入（ OLE）技術(shù) ................................................................................ 10 第二章 實現(xiàn)關(guān)系型數(shù)據(jù)庫 ............................................................ 12 數(shù)據(jù)庫的概念 ................................................................... 12 新建一個數(shù)據(jù)庫 ................................................................. 12 修改已建的數(shù)據(jù)庫 ............................................................... 12 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系 ........................................................... 12 ..................................................................... 13 ACCESS 和 VISUAL BASIC 結(jié)合的優(yōu)點 .....................................