【正文】
ir to Amack. They sit backwards on their painting b all lapse of time, and had bee a cipher and a nothing. Then three alone, or moveth upon greater means, if they have never so little hand in it, they think it is they that carry it They that are glorious, must needs be factious。 參考文獻(xiàn) [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è)計教程,高等教育出版社, 54 Of Vainglory It was prettily devised of Aesop。這些都有待進(jìn)一步改善。 我們設(shè)計的進(jìn)存銷系統(tǒng),在整體上實現(xiàn)了進(jìn)存銷功能,在設(shè)計時有時為了一個小問題要花費大量的時間和耗費很大的精力,在設(shè)計一些模塊時,遇到了很大的困難,但通過各方面的努力和與其他同學(xué)在一起進(jìn)行的討論,最終還是找到了錯誤并進(jìn)行了改正,并使結(jié)果更加完善 設(shè)計討論 能夠完成本次設(shè)計,首先要感謝指導(dǎo)老師吳潮老師對我所做的畢業(yè)設(shè)計所進(jìn)行的指導(dǎo)和建議,沒有老師的指導(dǎo)和建議,我的畢業(yè)設(shè)計不可能順利的完成。其中修改的按鈕同密碼的修改代碼,其查詢按鈕代碼如下: 其“查詢按鈕“的代碼實現(xiàn)如下 : Private Sub Command1_Click() Dim sql As String sql1 = select * from xiaoshou where danjuid=39。 銷售單基本操作 、銷售單具體操 作 是指對于銷售這個業(yè)務(wù)的基本的操作,例如:添加和修改的基本操作。 and amp。密碼修改 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。, 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。 Trim() amp。 amp。 txtSQL, conn, adOpenKeyset, adLockPessimistic If = True Then MsgBox 沒有這個用戶,請重新輸入用戶名 !, vbOKOnly + vbExclamation, 警告 Else If Trim(adors(Password)) = Trim() Then 39。普通用戶權(quán)限 IsUserMode = 2 Else 39。如果沒有這個用戶 MsgBox 沒有這個帳號,請重新輸入帳號 !, vbOKOnly + vbExclamation, 警告 = = Else 39。判斷密碼是否為空 MsgBox 請輸入密碼! , vbOKOnly + vbExclamation, 警告 Exit Sub End If 39。 “系統(tǒng)登錄”表單可以檢測用戶是否有正確的用戶與密碼,用來防止非法用戶進(jìn)入系統(tǒng),為系統(tǒng)安全提供一層防護(hù)作用。該模塊能夠根據(jù)基本資料來進(jìn)行服裝的進(jìn)貨,然后還能根據(jù)添加的每次進(jìn)貨信息進(jìn)行修改和刪除,也可以按照一定的條件來進(jìn)行查詢。然后能根據(jù)庫存的 上限和庫存下限進(jìn)行庫存的報警查詢。系統(tǒng)需要能夠?qū)M(jìn)貨信息進(jìn)行添加、修改、刪除,也可以按照一定條件來進(jìn)行查詢。這種方式在服裝數(shù)量較少、服裝庫存變換少的情況下,不失為一種較好的方法。 1993 年 Visual Basic 發(fā)布的時候, Jet 1。在表中使用的關(guān)鍵字類 型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。 ? 標(biāo)識需要的數(shù)據(jù); ? 收集被標(biāo)識的字段到表中; ? 標(biāo)識主關(guān)鍵字字段; ? 繪制一個簡單的數(shù)據(jù)圖表; ? 規(guī)范數(shù)據(jù); ? 標(biāo)識指定字段的信息; ? 創(chuàng)建物理表。 通過 VB的動態(tài)鏈接庫( DLL)技術(shù),在 VB 程序中可方便的調(diào)用用 C語言或匯編語言編寫的函數(shù),也可 調(diào)用 Windows 應(yīng)用程序接口( API)函數(shù),以實現(xiàn) SDK所能實現(xiàn)的功能。 ? 豐富的圖形指令,可方便的繪制各種圖形。 第一章 VB語言概述 VB 簡介 VB 是微軟公司出品的一個快速可視化程序開發(fā)工具軟件,借助微軟在操作系統(tǒng)和辦公軟件的壟斷地位, VB 在短短的幾年內(nèi)風(fēng)靡全球。而且,當(dāng)今商業(yè)經(jīng)營中服裝品種日益豐富,周轉(zhuǎn)期越來越短,信息量日益增多,原始的管理手段已不能適應(yīng)現(xiàn)代管理對信息的需求,對有些信息地統(tǒng)計,依靠手工已經(jīng)不可能實現(xiàn),即使有了結(jié)果,也不能避免信息的滯后、不準(zhǔn)確、不全面等弊端。在其他非生產(chǎn)性的單位,如超市、商店等,則主要涉及到進(jìn)貨、庫存、銷售和報損 4個方面。接著詳細(xì)介紹了數(shù)據(jù)庫和 VB 的相關(guān)知識 ;在編程工具方面,主要介紹了 VB 的特點和怎樣用 VB 操作數(shù)據(jù)庫 。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。從幾時起,“商戰(zhàn)”已成為信息戰(zhàn),“商戰(zhàn)”已從商場之外打響。 隨著通訊技術(shù)、網(wǎng)絡(luò)技術(shù)、計算機技術(shù)、軟件技術(shù)的發(fā)展,利用計算機系統(tǒng)通過對經(jīng)營活動中用到的信息進(jìn)行收集、整理、加工參與管理并輔助決策已成為可能。 VB 語言的基本特點及 VB應(yīng)用程序的基本持點 VB 程序語言具有許多優(yōu)秀的特性 ,用其設(shè)計應(yīng)用程序時有兩個基本特點 :可視化設(shè)計和事件驅(qū)動編程 . 可視化設(shè)計 VB 為用戶提供大量的界面元素 (在 VB 中稱為控件對象 ),這些控件對象對于熟悉 Windows 應(yīng)用程序的用戶而言是一點也不陌生 ,如 窗體 、 菜單 、 命令按鈕 、 工具按鈕 、 檢查框 等等 ,用戶只需要利用 鼠標(biāo)、鍵盤把這些控件對象拖動到適當(dāng)?shù)奈恢?,設(shè)置它們的大小、形狀、屬性等 ,就可以設(shè)計出所需的應(yīng)用程序界面。 ? 支持隨機文件訪問和順序文件訪問。數(shù)據(jù)庫的作用在于組織和表達(dá)信息,簡而言之,數(shù)據(jù)庫就是信息的集合。 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系 數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。系統(tǒng)用戶可以對這些文件執(zhí)行插入數(shù)據(jù)、檢索數(shù)據(jù)、更改數(shù)據(jù)、刪除數(shù)據(jù)等一系列操作。當(dāng)一個新版本的 Visual Basic 準(zhǔn)備發(fā)布的時候,它一定會內(nèi)置進(jìn)行了一些修改的最新版本 Jet 數(shù)據(jù)庫。 具體而言,服裝銷售管理系統(tǒng)需要實現(xiàn)以下需求: 夠 對企業(yè)所擁有的各種服裝的基礎(chǔ)信息進(jìn)行維護(hù)和管理。系統(tǒng)要求能夠?qū)︿N售信息進(jìn)行添加、修改、和刪除,也可以按照一定的條件來進(jìn)行查詢。 以下分別介紹系統(tǒng)中的 5個子模塊: 1系統(tǒng)管理模塊 管理員可以對系統(tǒng)進(jìn)行一切操作包括:管理員添加、管理員申請和密碼修改。該模塊需要能夠添加每次的銷售信 息,也可以對銷售信息進(jìn)行修改和刪除,也可以按照一定的條件查詢。 登陸表單界面如下: 登陸按鈕的 click 的代碼如下: Private Sub cmdOK_Click() 39。 amp。39。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。 修改密碼表單,主要是進(jìn)入系統(tǒng)的用戶修改自己的密碼的基本信息。 39。 amp。 在表格上刪除銷售單中的記錄。 39。踏實的基本功是做任何事的前提。有一些功能還很不完善,需要有進(jìn)一步的時間和精力去完善他,可惜到目前為止,已沒更長的時間讓我來完善這個企業(yè)工資管理系統(tǒng),可以說留下了一個小的遺憾 本系統(tǒng)的銷售模塊中的銷售退貨本應(yīng)和 銷售的基本操作一樣,但是由于功能是一樣的,為了使系統(tǒng)的涵蓋的知識多一點,所以只用銷售單的基本操作來實現(xiàn)。s eve I was reading the book, and had lost myself in it so pletely, that I fot my usual New Year39。 beaucoup de bruit, peu de fruit: much bruit, little fruit Yet certainly there is use of this quality, in civil affairs. Where there is an opinion, and fame to be created, either of virtue, or greatness, these men are good trumpeters. Again, as Titus Livius noteth, in the case of Antiochus, and the Aetolians。 which is to be liberal of praise and mendation to others, in that wherein a man\39。s goods, neither shall heuse anything which is his neighbour