【文章內(nèi)容簡(jiǎn)介】 數(shù)據(jù)庫(kù)系統(tǒng)，它與Windows NT/2000及Windows 9x等操作系統(tǒng)緊密集成。這種安排使SQL Server能充分利用操作系統(tǒng)所提供的特性。對(duì)于今天復(fù)雜的客戶/服務(wù)器系統(tǒng)來(lái)說(shuō)，SQL Server是一個(gè)很好的選擇。 第三章 開(kāi)發(fā)工具概述 Visual Basic概述Visual Basic(簡(jiǎn)稱VB)是Microsoft公司推出的Windows環(huán)境下的軟件開(kāi)發(fā)工具。在語(yǔ)言功能方面，它與以前的BASIC語(yǔ)言基本兼容，但功能更強(qiáng)大，使用更方便。 Visual Basic的特點(diǎn)Visual Basic是從BASIC發(fā)展而來(lái)的，對(duì)于開(kāi)發(fā)Windows應(yīng)用程序而言，VB是目前所有開(kāi)發(fā)語(yǔ)言中最為簡(jiǎn)單、最容易使用的語(yǔ)言?？偟闹v來(lái)，Visual Basic有以下主要特點(diǎn)。１. 可視化的設(shè)計(jì)平臺(tái)２. 面向?qū)ο蟮脑O(shè)計(jì)方法3 .結(jié)構(gòu)化的設(shè)計(jì)語(yǔ)言6. 開(kāi)放的數(shù)據(jù)庫(kù)功能與網(wǎng)絡(luò)支持 本設(shè)計(jì)中所涉及的重要概念及主要語(yǔ)句 在VB中有很多的概念和語(yǔ)句，但由于篇幅限制，我們不能在這里一一地詳細(xì)介紹。在這里我們就本設(shè)計(jì)中所涉及到地重要概念及語(yǔ)句簡(jiǎn)單地介紹一下。１. 數(shù)值型數(shù)據(jù)整型數(shù)（Integer）：整型數(shù)是沒(méi)有小數(shù)點(diǎn)和指數(shù)符號(hào)地?cái)?shù)，在內(nèi)存中占2個(gè)字節(jié)（16位），其取值范圍為32768~32767。長(zhǎng)整型數(shù)（Long）：長(zhǎng)整型數(shù)的數(shù)字組成與整型數(shù)相同，只是在內(nèi)存中要占4個(gè)字節(jié)（32位），其取值范圍為2147483648~2147483647。單精度浮點(diǎn)型數(shù)（Single）：浮點(diǎn)數(shù)也稱為實(shí)型或?qū)崝?shù)，是帶小數(shù)部分的數(shù)值。單精度浮點(diǎn)數(shù)以4個(gè)字節(jié)（32位）存儲(chǔ)，可表示最多7位有效字?jǐn)?shù)。單精度數(shù)可用定點(diǎn)形式和浮點(diǎn)形式來(lái)表示。2. 常量與變量 常量是指在程序運(yùn)行過(guò)程中始終保持不變的常數(shù)、字符串等。在VB中有兩種形式的常量：直接常量和符號(hào)常量。直接常量就是在程序代碼中，以直接明顯的形式給出的數(shù)據(jù)。如果在程序中多次出現(xiàn)一些很大的數(shù)字或很小的字符串，為了改進(jìn)代碼的可讀性和可維護(hù)性，應(yīng)該使用符號(hào)常量，即給某一特定的值賦予一個(gè)名字，以后用到這個(gè)值時(shí)就用名字代表，這樣便于程序修改和閱讀。在程序中處理數(shù)據(jù)時(shí)，對(duì)于輸入的數(shù)據(jù)、參與運(yùn)算的數(shù)據(jù)、運(yùn)行結(jié)果等臨時(shí)數(shù)據(jù)，通常將它暫時(shí)存儲(chǔ)在計(jì)算機(jī)的內(nèi)存中。在VB中，可以用名字表示內(nèi)存位置，這樣就能訪問(wèn)內(nèi)存中的數(shù)據(jù)。一個(gè)有名稱的內(nèi)存位置稱為變量。和其它語(yǔ)言一樣，VB也用變量存儲(chǔ)數(shù)據(jù)值。每個(gè)變量都有一個(gè)名字和相應(yīng)的數(shù)據(jù)類(lèi)型，通過(guò)名字來(lái)引用一個(gè)變量。數(shù)據(jù)類(lèi)型決定了該變量的存儲(chǔ)方式。變量聲明的一般格式為：Dim ︱private︱Static︱Public 變量名 [As 類(lèi)型 ][，變量名2 [As 類(lèi)型2]……3. 算術(shù)運(yùn)算符算術(shù)運(yùn)算符是算術(shù)表達(dá)式的基礎(chǔ)。VB提供了以下7中算術(shù)運(yùn)算符：+（加法運(yùn)算）（減法運(yùn)算）*（乘法運(yùn)算，相當(dāng)于數(shù)學(xué)中的）/（浮點(diǎn)除法運(yùn)算，相當(dāng)于數(shù)學(xué)中的247。） ^（乘方運(yùn)算，也稱指數(shù)運(yùn)算）\ (整除運(yùn)算)Mod (求余的模運(yùn)算)4. VB內(nèi)部函數(shù)VB 提供許多的內(nèi)部函數(shù)，這里我們只介紹轉(zhuǎn)換函數(shù)Val(x)和CStr(x)，CStr(x)是將x轉(zhuǎn)換成字符串型。若x為數(shù)值型，則轉(zhuǎn)換為數(shù)字字符串。而Val(x)是將文本框輸入的數(shù)據(jù)轉(zhuǎn)換成數(shù)值型。5. 賦值語(yǔ)句賦值語(yǔ)句的一般格式為：[Let] 名稱=表達(dá)式其中，“Let”是可選項(xiàng)，一般情況下省略該項(xiàng)?！懊Q”是變量或?qū)傩缘拿Q，“表達(dá)式”可以式算術(shù)表達(dá)式、字符串表達(dá)式、關(guān)系表達(dá)式、邏輯表達(dá)式。6. 注釋語(yǔ)句為了提高程序的可讀性，通常應(yīng)在程序的適當(dāng)位置加上必要的注釋。VB中的注釋是”Rem”或一個(gè)撇號(hào)“′”,其格式為：Rem 注釋內(nèi)容或′注釋內(nèi)容7. 選擇結(jié)構(gòu)程序語(yǔ)句（If 語(yǔ)句）(1) 單行結(jié)構(gòu)條件語(yǔ)句單行條件語(yǔ)句的格式為：If 條件 Then 語(yǔ)句1 [Else 語(yǔ)句2]If 語(yǔ)句的條件可以是關(guān)系表達(dá)式、邏輯表達(dá)式、也可以是數(shù)值表達(dá)式（非0為真，0為假）。在條件成立時(shí)，執(zhí)行語(yǔ)句1，不成立時(shí)執(zhí)行語(yǔ)句2，且語(yǔ)句2可省略。（2）If 語(yǔ)句的嵌套 如果在IF語(yǔ)句中，語(yǔ)句序列1或語(yǔ)句序列2本身又是一個(gè)If語(yǔ)句，則稱為If語(yǔ)句的嵌套。在嵌套結(jié)構(gòu)中，只能實(shí)現(xiàn)完全“包含”，不能互相“騎跨”，即把If …Then…Else看作另一個(gè)IF結(jié)構(gòu)中的語(yǔ)句序列中的一條語(yǔ)句。另外，當(dāng)出現(xiàn)多層If語(yǔ)句嵌套時(shí)，程序比較冗長(zhǎng)，為了簡(jiǎn)化書(shū)寫(xiě)，VB提供了帶ElseIf的塊If語(yǔ)句來(lái)處理當(dāng)條件為假時(shí)又有嵌塊If語(yǔ)句的情形。其語(yǔ)法格式為：If 條件 Then [語(yǔ)句序列1]ElseIf 條件2 Then [語(yǔ)句序列2]…[Else [其它語(yǔ)句序列]]End If8. 循環(huán)語(yǔ)句VB提供了多種不同風(fēng)格的循環(huán)結(jié)構(gòu)語(yǔ)句，包括Do…Loop，While…Wend，F(xiàn)or…next，F(xiàn)or each…Next等，以及傳統(tǒng)的GoTo語(yǔ)句，這里我們使用的是For…Next語(yǔ)句。For … Next語(yǔ)句適用于已經(jīng)知道循環(huán)的次數(shù)。其語(yǔ)句格式為：For 循環(huán)變量=初值 To 終值 [Step 步長(zhǎng)] [語(yǔ)句序列1] [Exit For] [語(yǔ)句序列2]Next [循環(huán)變量]9. 使用過(guò)程 過(guò)程調(diào)用有函數(shù)過(guò)程調(diào)用（Function），Sub過(guò)程，事件過(guò)程，這里只介紹Sub過(guò)程。VB用兩種方式調(diào)用Sub過(guò)程。一種是把過(guò)程名放在Call語(yǔ)句中，一種是把過(guò)程名作為一個(gè)語(yǔ)句來(lái)使用。（1）用Call語(yǔ)句調(diào)用Sub過(guò)程 調(diào)用Sub過(guò)程語(yǔ)法如下： Call 過(guò)程名（實(shí)在參數(shù)表）執(zhí)行Call語(yǔ)句，VB將控制傳遞給由“過(guò)程名”指定的Sub過(guò)程，開(kāi)始執(zhí)行它。實(shí)在參數(shù)是傳遞給被調(diào)用的Sub過(guò)程的Sub過(guò)程的變量、常量或表達(dá)式。如果被調(diào)用的程序是一個(gè)有參過(guò)程，在一般情況下，實(shí)在參數(shù)的個(gè)數(shù)、類(lèi)型、和順序，應(yīng)與被調(diào)用過(guò)程的形式參數(shù)相匹配。有多個(gè)參數(shù)時(shí)各實(shí)在參數(shù)之間用逗號(hào)分隔。如果被調(diào)用過(guò)程是一個(gè)無(wú)參過(guò)程，則括號(hào)均可省略。（2）把過(guò)程名作為一個(gè)語(yǔ)句來(lái)用 調(diào)用過(guò)程的語(yǔ)法如下： 過(guò)程名 [實(shí)參1[，實(shí)參2…]]與第一種方式相比，它有兩點(diǎn)不同：去掉關(guān)鍵字Call和去掉“實(shí)在參數(shù)表”的括號(hào)。 ADO在 Visual Basic 中，可用的數(shù)據(jù)訪問(wèn)接口有三種：ActiveX 數(shù)據(jù)對(duì)象(ADO)、遠(yuǎn)程數(shù)據(jù)對(duì)象(RDO) 和數(shù)據(jù)訪問(wèn)對(duì)象(DAO)。數(shù)據(jù)訪問(wèn)接口是一個(gè)對(duì)象模型，它代表了訪問(wèn)數(shù)據(jù)的各個(gè)方面。使用 Visual Basic，可以在任何應(yīng)用程序中通過(guò)編程控制連接、語(yǔ)句生成器和供使用的返回?cái)?shù)據(jù)。ADO 是為 Microsoft最新和最強(qiáng)大的數(shù)據(jù)訪問(wèn)范例 OLE DB 而設(shè)計(jì)的，是一個(gè)便于使用的應(yīng)用程序?qū)咏涌凇LE DB 為任何數(shù)據(jù)源提供了高性能的訪問(wèn)，這些數(shù)據(jù)源包括關(guān)系和非關(guān)系數(shù)據(jù)庫(kù)、電子郵件和文件系統(tǒng)、文本和圖形、自定義業(yè)務(wù)對(duì)象等等。ADO 在關(guān)鍵的 Internet 方案中使用最少的網(wǎng)絡(luò)流量，并且在前端和數(shù)據(jù)源之間使用最少的層數(shù)，所有這些都是為了提供輕量、高性能的接口。之所以稱為 ADO，是用了一個(gè)比較熟悉的暗喻，OLE 自動(dòng)化接口。同時(shí) ADO 使用了與 DAO和 RDO相似的約定和特性，簡(jiǎn)化的語(yǔ)義使它更易于學(xué)習(xí)。以下元素是 ADO 編程模型中的關(guān)鍵部分： 連接通過(guò)“連接”可從應(yīng)用程序訪問(wèn)數(shù)據(jù)源，連接是交換數(shù)據(jù)所必需的環(huán)境。通過(guò)如 Microsoft174。 Internet Information Server 作為媒介，應(yīng)用程序可直接（有時(shí)稱為雙層系統(tǒng)）或間接（有時(shí)稱為三層系統(tǒng)）訪問(wèn)數(shù)據(jù)源。對(duì)象模型使用 Connection 對(duì)象使連接概念得以具體化。ADO 從 OLE DB 提供者訪問(wèn)數(shù)據(jù)和服務(wù)。Connection 對(duì)象用于指定專(zhuān)門(mén)的提供者和任意參數(shù)。例如，可對(duì)遠(yuǎn)程數(shù)據(jù)服務(wù) (RDS) 進(jìn)行顯式調(diào)用，或通過(guò)“MS Remote”提供者進(jìn)行隱式調(diào)用。命令通過(guò)已建立的連接發(fā)出的“命令”可以某種方式來(lái)操作數(shù)據(jù)源。一般情況下，命令可以在數(shù)據(jù)源中添加、刪除或更新數(shù)據(jù)，或者在表中以行的格式檢索數(shù)據(jù)。對(duì)象模型用 Command對(duì)象來(lái)體現(xiàn)命令概念。使用 Command 對(duì)象可使 ADO 優(yōu)化命令的執(zhí)行。參數(shù)通常，命令需要的變量部分即“參數(shù)”可以在命令發(fā)布之前進(jìn)行更改。例如，可重復(fù)發(fā)出相同的數(shù)據(jù)檢索命令，但每一次均可更改指定的檢索信息。參數(shù)對(duì)與函數(shù)活動(dòng)相同的可執(zhí)行命令非常有用，這樣就可知道命令是做什么的，但不必知道它如何工作。例如，可發(fā)出一項(xiàng)銀行過(guò)戶命令，從一方借出貸給另一方。可將要過(guò)戶的款額設(shè)置為參數(shù)。對(duì)象模型用 Parameter對(duì)象來(lái)體現(xiàn)參數(shù)概念。記錄集如果命令是在表中按信息行返回?cái)?shù)據(jù)的查詢（行返回查詢），則這些行將會(huì)存儲(chǔ)在本地。對(duì)象模型將該存儲(chǔ)體現(xiàn)為 Recordset對(duì)象。但是，不存在僅代表單獨(dú)一個(gè) Recordset 行的對(duì)象。記錄集是在行中檢查和修改數(shù)據(jù)最主要的方法。 字段一個(gè)記錄集行包含一個(gè)或多個(gè)“字段”。如果將記錄集看作二維網(wǎng)格，字段將排列構(gòu)成“列”。每一字段（列）都分別包含有名稱、數(shù)據(jù)類(lèi)型和值的屬性，正是在該值中包含了來(lái)自數(shù)據(jù)源的真實(shí)數(shù)據(jù)。對(duì)象模型以 Field對(duì)象體現(xiàn)字段。要修改數(shù)據(jù)源中的數(shù)據(jù)，可在記錄集行中修改 Field 對(duì)象的值，對(duì)記錄集的更改最終被傳送給數(shù)據(jù)源。錯(cuò)誤錯(cuò)誤隨時(shí)可在應(yīng)用程序中發(fā)生，通常是由于無(wú)法建立連接、執(zhí)行命令或?qū)δ承顟B(tài)（例如，試圖使用沒(méi)有初始化的記錄集）的對(duì)象進(jìn)行操作。對(duì)象模型以 Error對(duì)象體現(xiàn)錯(cuò)誤。任意給定的錯(cuò)誤都會(huì)產(chǎn)生一個(gè)或多個(gè) Error 對(duì)象，隨后產(chǎn)生的錯(cuò)誤將會(huì)放棄先前的 Error 對(duì)象組。屬性每個(gè) ADO 對(duì)象都有一組唯一的“屬性”來(lái)描述或控制對(duì)象的行為。屬性有內(nèi)置和動(dòng)態(tài)兩種類(lèi)型。內(nèi)置屬性是 ADO 對(duì)象的一部分并且隨時(shí)可用。動(dòng)態(tài)屬性則由特別的數(shù)據(jù)提供者添加到 ADO 對(duì)象的屬性集合中，僅在提供者被使用時(shí)才能存在。對(duì)象模型以 Property對(duì)象體現(xiàn)屬性。集合ADO 提供“集合”，這是一種可方便地包含其他特殊類(lèi)型對(duì)象的對(duì)象類(lèi)型。使用集合方法可按名稱（文本字符串）或序號(hào)（整型數(shù)）對(duì)集合中的對(duì)象進(jìn)行檢索。 SQL Server概述 SQL Server 是一種高效的關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)，它與Windows NT/2000及Windows 9x等操作系統(tǒng)緊密集成。這種安排使SQL Server能充分利用操作系統(tǒng)所提供的特性。對(duì)于今天復(fù)雜的客戶/服務(wù)器系統(tǒng)來(lái)說(shuō)，SQL Server是一個(gè)很好的選擇。 SQL Server 2000 的特性 Internet 集成SQL Server 2000 數(shù)據(jù)庫(kù)引擎提供完整的 XML 支持。它還具有構(gòu)成最大的 Web 站點(diǎn)的數(shù)據(jù)存儲(chǔ)組件所需的可伸縮性、可用性和安全功能。SQL Server 2000 程序設(shè)計(jì)模型與 Windows DNA 構(gòu)架集成，用以開(kāi)發(fā) Web 應(yīng)用程序，并且 SQL Server 2000 支持 English Query 和 Microsoft 搜索服務(wù)等功能，在 Web 應(yīng)用程序中包含了用戶友好的查詢和強(qiáng)大的搜索功能?？缮炜s性和可用性 同一個(gè)數(shù)據(jù)庫(kù)引擎可以在不同的平臺(tái)上使用，從運(yùn)行 Microsoft Windows174。 98 的便攜式電腦，到運(yùn)行 Microsoft Windows 2000 數(shù)據(jù)中心版的大型多處理器服務(wù)器。SQL Server 2000 企業(yè)版支持聯(lián)合服務(wù)器、索引視圖和大型內(nèi)存支持等功能，使其得以升級(jí)到最大 Web 站點(diǎn)所需的性能級(jí)別。企業(yè)級(jí)數(shù)據(jù)庫(kù)功能 SQL Server 2000 關(guān)系數(shù)據(jù)庫(kù)引擎支持當(dāng)今苛刻的數(shù)據(jù)處理環(huán)境所需的功能。數(shù)據(jù)庫(kù)引擎充分保護(hù)數(shù)據(jù)完整性，同時(shí)將管理上千個(gè)并發(fā)修改數(shù)據(jù)庫(kù)的用戶的開(kāi)銷(xiāo)減到最小。SQL Server 2000 分布式查詢使您得以引用來(lái)自不同數(shù)據(jù)源的數(shù)據(jù)，就好象這些數(shù)據(jù)是 SQL Server 2000 數(shù)據(jù)庫(kù)的一部分，同時(shí)分布式事務(wù)支持充分保護(hù)任何分布式數(shù)據(jù)更新的完整性。復(fù)制同樣使您得以維護(hù)多個(gè)數(shù)據(jù)復(fù)本，同時(shí)確保單獨(dú)的數(shù)據(jù)復(fù)本保持同步?？蓪⒁唤M數(shù)據(jù)復(fù)制到多個(gè)移動(dòng)的脫接用戶，使這些用戶自主地工作，然后將他們所做的修改合并回發(fā)布服務(wù)器。易于安裝、部署和使用 SQL Server 2000 中包括一系列管理和開(kāi)發(fā)工具，這些工具可改進(jìn)在多個(gè)站點(diǎn)上安裝、部署、管理和使用 SQL Server 的過(guò)程。SQL Server 2000 還支持基于標(biāo)準(zhǔn)的、與 Windows DNA 集成的程序設(shè)計(jì)模型，使 SQL Server 數(shù)據(jù)庫(kù)和數(shù)據(jù)倉(cāng)庫(kù)的使用成為生成強(qiáng)大的可伸縮系統(tǒng)的無(wú)縫部分。這些功能使您得以快速交付 SQL Server 應(yīng)用程序，使客戶只需最少的安裝和管理開(kāi)銷(xiāo)即可實(shí)現(xiàn)這些應(yīng)用程序。數(shù)據(jù)倉(cāng)庫(kù)。 SQL Server 2000 中包括析取和分析匯總數(shù)據(jù)以進(jìn)行聯(lián)機(jī)分析處理 (OLAP) 的工具。SQL Server 中還包括一些工具，可用來(lái)直觀地設(shè)計(jì)數(shù)據(jù)庫(kù)并通過(guò) English Query 來(lái)分析數(shù)據(jù)。 第四章 系統(tǒng)具體編碼實(shí)現(xiàn) 模塊的基本目的是創(chuàng)建相當(dāng)獨(dú)立的程序單元，從根本上講，模塊可以添加給另一個(gè)工程，并且可以通過(guò)直接調(diào)用它的公用過(guò)程來(lái)使用它。這種通用模塊并不依賴于全局?jǐn)?shù)據(jù)或其它模塊中的過(guò)程。當(dāng)模塊包含一組緊密關(guān)聯(lián)的過(guò)程時(shí)，該模塊可以說(shuō)具有強(qiáng)大的內(nèi)聚力。當(dāng)模塊包含許多互補(bǔ)相關(guān)的過(guò)程時(shí)，該模塊編具有較弱的內(nèi)聚力。本設(shè)計(jì)努力創(chuàng)建內(nèi)聚力比較強(qiáng)的模塊。創(chuàng)建的模塊有MdlConSQL和MdlAPIMdlConSQL用于連接數(shù)據(jù)庫(kù)，其中包含了一個(gè)自動(dòng)產(chǎn)生收費(fèi)編號(hào)的全局過(guò)程CreatPrepayId，編碼為：Public G_OperatorId As String 39。記錄操作員編號(hào)Public G_InhosId As S