【正文】 ces seeking the I mperishable Flame。Mighty are the Ainur, and mightiest among them is Melkor 。 and he lifted up his right hand, and behold! a third theme grew amid the confusion, and it was unlike the others. For it seemed at first soft and sweet, a mere rippling of gentle sounds in delicate melodies。 for each prehended only that part of me mind of Il 鷙 atar from which he came, and in the understanding of their brethren they grew but slowly. Yet ever as they listened they came to deeper understanding, and increased in unison and harmony. And it came to pass that Il 鷙 atar called together all the Ainur and declared to them a mighty theme, unfolding to them things greater and more wonderful than he had yet revealed。有一些功能還很不完善，需要有進一步的時間和精力去完善他，可惜到目前為止，已沒更長的時間讓我來完善這個企業(yè)工資管理系統(tǒng)，可以說留下了一個小的遺憾 本系統(tǒng)的銷售模塊中的銷售退貨本應(yīng)和 銷售的基本操作一樣，但是由于功能是一樣的，為了使系統(tǒng)的涵蓋的知識多一點，所以只用銷售單的基本操作來實現(xiàn)。踏實的基本功是做任何事的前提。 39。 在表格上刪除銷售單中的記錄。 amp。 39。 修改密碼表單，主要是進入系統(tǒng)的用戶修改自己的密碼的基本信息。39。, CN, adOpenStatic, adLockOptimistic If (0) 0 Then MsgBox 用戶已經(jīng)存在 ! 請改用戶名稱 !, , 系統(tǒng)提示 = Exit Sub End If If Then select * from 系統(tǒng)用戶 , CN, adOpenStatic, adLockOptimistic (0).Value = Trim() (1).Value = Trim() (2).Value = Trim() Trim() MsgBox 用戶添加成功 !,初始密碼為 amp。但是并不是每個用戶都可以申請的。39。39。 amp。 登陸表單界面如下： 登陸按鈕的 click 的代碼如下： Private Sub cmdOK_Click() 39。該模塊需要能夠添加每次的銷售信 息，也可以對銷售信息進行修改和刪除，也可以按照一定的條件查詢。 以下分別介紹系統(tǒng)中的 5個子模塊： 1系統(tǒng)管理模塊 管理員可以對系統(tǒng)進行一切操作包括：管理員添加、管理員申請和密碼修改。系統(tǒng)要求能夠?qū)︿N售信息進行添加、修改、和刪除，也可以按照一定的條件來進行查詢。 具體而言，服裝銷售管理系統(tǒng)需要實現(xiàn)以下需求： 夠 對企業(yè)所擁有的各種服裝的基礎(chǔ)信息進行維護和管理。當一個新版本的 Visual Basic 準備發(fā)布的時候，它一定會內(nèi)置進行了一些修改的最新版本 Jet 數(shù)據(jù)庫。系統(tǒng)用戶可以對這些文件執(zhí)行插入數(shù)據(jù)、檢索數(shù)據(jù)、更改數(shù)據(jù)、刪除數(shù)據(jù)等一系列操作。 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系 數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。數(shù)據(jù)庫的作用在于組織和表達信息，簡而言之，數(shù)據(jù)庫就是信息的集合。 ? 支持隨機文件訪問和順序文件訪問。 VB 語言的基本特點及 VB應(yīng)用程序的基本持點 VB 程序語言具有許多優(yōu)秀的特性 ,用其設(shè)計應(yīng)用程序時有兩個基本特點 :可視化設(shè)計和事件驅(qū)動編程 . 可視化設(shè)計 VB 為用戶提供大量的界面元素 (在 VB 中稱為控件對象 ),這些控件對象對于熟悉 Windows 應(yīng)用程序的用戶而言是一點也不陌生 ,如 窗體 、 菜單 、 命令按鈕 、 工具按鈕 、 檢查框 等等 ,用戶只需要利用 鼠標、鍵盤把這些控件對象拖動到適當?shù)奈恢?,設(shè)置它們的大小、形狀、屬性等 ,就可以設(shè)計出所需的應(yīng)用程序界面。 隨著通訊技術(shù)、網(wǎng)絡(luò)技術(shù)、計算機技術(shù)、軟件技術(shù)的發(fā)展，利用計算機系統(tǒng)通過對經(jīng)營活動中用到的信息進行收集、整理、加工參與管理并輔助決策已成為可能。從幾時起，“商戰(zhàn)”已成為信息戰(zhàn)，“商戰(zhàn)”已從商場之外打響。s present situation as well as enters sells the balance according to the management system management system characteristic, The function and the user, caused the reader to enter sells saves the management system management system to have the preliminary understanding. After that in detail was introducing the database and the VB related knowledge。接著詳細介紹了數(shù)據(jù)庫和 VB 的相關(guān)知識 ；在編程工具方面，主要介紹了 VB 的特點和怎樣用 VB 操作數(shù)據(jù)庫 。在其他非生產(chǎn)性的單位，如超市、商店等，則主要涉及到進貨、庫存、銷售和報損 4個方面。而且，當今商業(yè)經(jīng)營中服裝品種日益豐富，周轉(zhuǎn)期越來越短，信息量日益增多，原始的管理手段已不能適應(yīng)現(xiàn)代管理對信息的需求，對有些信息地統(tǒng)計，依靠手工已經(jīng)不可能實現(xiàn)，即使有了結(jié)果，也不能避免信息的滯后、不準確、不全面等弊端。 第一章 VB語言概述 VB 簡介 VB 是微軟公司出品的一個快速可視化程序開發(fā)工具軟件，借助微軟在操作系統(tǒng)和辦公軟件的壟斷地位， VB 在短短的幾年內(nèi)風(fēng)靡全球。 ? 豐富的圖形指令，可方便的繪制各種圖形。 通過 VB的動態(tài)鏈接庫（ DLL）技術(shù)，在 VB 程序中可方便的調(diào)用用 C語言或匯編語言編寫的函數(shù)，也可 調(diào)用 Windows 應(yīng)用程序接口（ API）函數(shù)，以實現(xiàn) SDK所能實現(xiàn)的功能。 ? 標識需要的數(shù)據(jù)； ? 收集被標識的字段到表中； ? 標識主關(guān)鍵字字段； ? 繪制一個簡單的數(shù)據(jù)圖表； ? 規(guī)范數(shù)據(jù)； ? 標識指定字段的信息； ? 創(chuàng)建物理表。在表中使用的關(guān)鍵字類 型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。 1993 年 Visual Basic 發(fā)布的時候， Jet 1。這種方式在服裝數(shù)量較少、服裝庫存變換少的情況下，不失為一種較好的方法。系統(tǒng)需要能夠?qū)M貨信息進行添加、修改、刪除，也可以按照一定條件來進行查詢。然后能根據(jù)庫存的 上限和庫存下限進行庫存的報警查詢。該模塊能夠根據(jù)基本資料來進行服裝的進貨，然后還能根據(jù)添加的每次進貨信息進行修改和刪除，也可以按照一定的條件來進行查詢。 “系統(tǒng)登錄”表單可以檢測用戶是否有正確的用戶與密碼，用來防止非法用戶進入系統(tǒng)，為系統(tǒng)安全提供一層防護作用。判斷密碼是否為空 MsgBox 請輸入密碼！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If 39。如果沒有這個用戶 MsgBox 沒有這個帳號，請重新輸入帳號 !, vbOKOnly + vbExclamation, 警告 = = Else 39。普通用戶權(quán)限 IsUserMode = 2 Else 39。 txtSQL, conn, adOpenKeyset, adLockPessimistic If = True Then MsgBox 沒有這個用戶，請重新輸入用戶名 !, vbOKOnly + vbExclamation, 警告 Else If Trim(adors(Password)) = Trim() Then 39。 amp。 Trim() amp。, 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 If Then select * from 系統(tǒng)用戶 where 用戶名 =39。 and amp。 銷售單基本操作 、銷售單具體操 作 是指對于銷售這個業(yè)務(wù)的基本的操作，例如：添加和修改的基本操作。其中修改的按鈕同密碼的修改代碼，其查詢按鈕代碼如下： 其“查詢按鈕“的代碼實現(xiàn)如下 : Private Sub Command1_Click() Dim sql As String sql1 = select * from xiaoshou where danjuid=39。 我們設(shè)計的進存銷系統(tǒng)，在整體上實現(xiàn)了進存銷功能，在設(shè)計時有時為了一個小問題要花費大量的時間和耗費很大的精力，在設(shè)計一些模塊時，遇到了很大的困難，但通過各方面的努力和與其他同學(xué)在一起進行的討論，最終還是找到了錯誤并進行了改正，并使結(jié)果更加完善 設(shè)計討論 能夠完成本次設(shè)計，首先要感謝指導(dǎo)老師吳潮老師對我所做的畢業(yè)設(shè)計所進行的指導(dǎo)和建議，沒有老師的指導(dǎo)和建議，我的畢業(yè)設(shè)計不可能順利的完成。這些都有待進一步改善。 參考文獻 [1]趙軍鎖，龔波，李志 .Visual Basic 6 數(shù)據(jù)庫訪問技術(shù)，機械工業(yè)出版社 ， [2]李勇平 .Visual Basic 案例教程，電子出版物數(shù)據(jù)中心《 Computer DIY》雜志社， [3]張煒 .Visual Basic 數(shù)據(jù)庫開發(fā)應(yīng)用教程，航空工業(yè)出版社， [4]馮碩，賈志博 .Visual Basic 數(shù)據(jù)庫編程寶典，電子工業(yè)出版社， [5]劉韜，駱娟，何旭洪 .Visual Basic 數(shù)據(jù)庫系統(tǒng)開發(fā)實例導(dǎo)航，人民郵電出版社， [6]溫賢發(fā) .Visual Basic 6 數(shù)據(jù)庫程序設(shè)計高手，科學(xué)出版社， [7]京輝熱點工作室 .Visual Basic 中文版編程指南，人民郵電出版社， [8]李振亭 .Visual Basic 程序設(shè)計教程，北方交通大學(xué)出版社， [9]劉圣才，李春葆 .Visual Basic 6 程序設(shè)計導(dǎo)學(xué)，清華大學(xué)出版社， [10]龔沛曾，陸慰民，楊志強 .Visual Basic 程序設(shè)計教程，高等教育出版社， Christopher Tolkien AINULINDAL? The Music of the Ainur There was Eru, the One, who in Arda is called Il 鷙 atar。 for desire grew hot within him to br ing into Being