【正文】 sqlstr, con, 1, 1 If Not Then If rs(UserPWD) Userpwd Then 39。 Userid amp。根據(jù)以上的設(shè)計(jì)，cmdOkCancel的Click事件的代碼如下：Private Sub cmdOkCancel_Click(Index As Integer) Select Case Index Case 0 …… Userid = Trim() Userpwd = MD5(Trim()) sqlstr = select * from UserInfo where UserID=39。Private Sub Form_Load() loginno = 0 End Sub這里將“確定”和“取消”兩個(gè)按鈕作為一個(gè)按鈕數(shù)組cmdOkCancel：確定按鈕的index屬性為0，取消按鈕的index屬性為1。這里附上本程序的登陸界面。Data Source=amp。2． 添加部件：?jiǎn)螕艄こ滩藛沃械牟考x項(xiàng)，添加Microsoft ADO Data Control (OLEDB)、Microsoft Common Dialog Control (SP3) 、Microsoft FlexGrid Control 、Microsoft Windows Common Controls (SP4)和Microsoft Windows Common Controls2 。（三）專業(yè)/學(xué)院設(shè)置：（三）考試成績(jī)管理：（四）查詢學(xué)生信息：根據(jù)學(xué)號(hào)或姓名對(duì)學(xué)生信息進(jìn)行精確/模糊查詢（五）用戶管理：定義使用本系統(tǒng)的用戶名稱及密碼 經(jīng)過(guò)需求分析、功能模塊設(shè)計(jì)之后要進(jìn)入詳細(xì)設(shè)計(jì)階段，本階段將按系統(tǒng)的主要模塊進(jìn)行論述，重在闡述具體的某項(xiàng)功能的實(shí)現(xiàn)方法或運(yùn)用到的相關(guān)技術(shù)。1． 用戶信息表（UserInfo）：字段名數(shù)據(jù)類型說(shuō)明是否為空是否為關(guān)鍵字UserID文本用戶名Not NullPrimary KeyUserPWD文本用戶密碼Not NullUserName文本姓名Not NullUserPower文本使用權(quán)限Not Null（StuInfo）：字段名數(shù)據(jù)類型說(shuō)明是否為空是否為關(guān)鍵字SID文本學(xué)號(hào)Not NullPrimary KeySName文本姓名Not NullSGender文本性別Not NullSPlace文本籍貫Not NullSBirthday日期/時(shí)間出生日期Not NullSMinzu文本民族Not NullSZhengzhi文本政治面貌Not NullSDormitory文本寢室號(hào)碼Not NullSAddress文本家庭住址Not NullSCode文本郵政編碼Not NullSTel文本聯(lián)系電話Not NullSRemark備注備注Not Null（Class）：字段名數(shù)據(jù)類型說(shuō)明是否為空是否為關(guān)鍵字ID文本班級(jí)代碼Not NullPrimary Key（Major）：字段名數(shù)據(jù)類型說(shuō)明是否為空是否為關(guān)鍵字ID文本專業(yè)代號(hào)Not NullPrimary KeyName文本專業(yè)名稱Not Null（Depart）：字段名數(shù)據(jù)類型說(shuō)明是否為空是否為關(guān)鍵字ID文本學(xué)院代號(hào)Not NullPrimary KeyName文本學(xué)院名稱Not Null6．課程信息表（Lesson）：字段名數(shù)據(jù)類型說(shuō)明是否為空是否為關(guān)鍵字ID文本課程代號(hào)Not NullPrimary KeyName文本課程名稱Not NullTime文本課時(shí)Not NullMark 文本學(xué)分Not Null7．學(xué)生成績(jī)表（Result）：字段名數(shù)據(jù)類型說(shuō)明是否為空是否為關(guān)鍵字ID文本學(xué)生學(xué)號(hào)Not NullPrimary KeyName文本課程名稱Not NullPrimary KeyScore文本分?jǐn)?shù)Not NullRemark文本備注Not Null2．2系統(tǒng)流程圖登陸表單（管理員或者普通用戶身份登陸）Splash表單MDI主窗口（系統(tǒng)主窗口）管理學(xué)生學(xué)籍信息（學(xué)生基本信息管理，課程管理，專業(yè)/學(xué)院管理和考試成績(jī)管理管理系統(tǒng)用戶（添加，刪除）對(duì)學(xué)生信息進(jìn)行查找（按學(xué)號(hào)或姓名）返回查詢信息管理員登陸重新登陸 系統(tǒng)流程圖學(xué)籍管理處系統(tǒng)管理員學(xué)生教師商店系統(tǒng)用戶管理系部信息管理課程信息管理班級(jí)信息管理教師信息管理學(xué)生信息管理班級(jí)學(xué)生查詢學(xué)生成績(jī)錄入成績(jī)查詢選課選課信息管理工作：2．4 系統(tǒng)功能分析系統(tǒng)開發(fā)的目標(biāo)是實(shí)現(xiàn)學(xué)生學(xué)籍管理的系統(tǒng)化、規(guī)范化和自動(dòng)化，這是在用戶要求的基礎(chǔ)上提出來(lái)的，功能要求如下： （一）學(xué)生信息管理：能對(duì)學(xué)生信息進(jìn)行添加、修改、刪除。 + \③設(shè)定SQL語(yǔ)句，使用“Execute”命令，即可開始執(zhí)行訪問(wèn)數(shù)據(jù)庫(kù)的動(dòng)作Dim rs As New 其中rs為結(jié)果集對(duì)象（RECORDSET）④關(guān)閉結(jié)果集對(duì)象，斷開與數(shù)據(jù)庫(kù)的連接2．1數(shù)據(jù)庫(kù)的設(shè)計(jì)在系統(tǒng)設(shè)計(jì)過(guò)程中，首先要建立的就是數(shù)據(jù)庫(kù)。而對(duì)于Access數(shù)據(jù)庫(kù)，連接語(yǔ)句為 Provider=。pwd=。server=localhost。⑴ 篩選及排序記錄的Select指令基本句型一：Select 字段串列 From 數(shù)據(jù)表基本句型二：Select … From … Where 篩選條件基本句型三：Select … From … Order By字段串列Select Top：限定選取數(shù)據(jù)的條數(shù)⑵ 刪除數(shù)據(jù)記錄的Delete指令基本語(yǔ)法：Delete From 數(shù)據(jù)表 Where 條件式⑶ 更新數(shù)據(jù)記錄的Update指令基本語(yǔ)法：Update 數(shù)據(jù)表Set 表達(dá)式⑷ 增加數(shù)據(jù)記錄的Insert Into 指令基本句型一：Insert Into 數(shù)據(jù)表 (字段串列) Values (字段串列)基本句型二：Insert Into 數(shù)據(jù)表 (字段1,字段2,…,字段n) Select …⑸ 建立新數(shù)據(jù)表的Select Into 指令該指令與“Insert Into … Select …”指令的區(qū)別是，這個(gè)指令將建立另一個(gè)新的數(shù)據(jù)表，而Insert Into是增加數(shù)據(jù)記錄到“現(xiàn)存的”數(shù)據(jù)表中。SQL命令主要分成兩部分：DDL(Data Definition Language)和DML(Data Manipulation Language),其中DDL是建立數(shù)據(jù)表及數(shù)據(jù)列的指令群，而DML則是操作數(shù)據(jù)庫(kù)記錄的指令群，如數(shù)據(jù)庫(kù)記錄的添加、更新、刪除、和查詢等。使用ADO對(duì)象可以建立和管理數(shù)據(jù)庫(kù)的連接，按數(shù)據(jù)庫(kù)服務(wù)器的要求獲得數(shù)據(jù)，執(zhí)行更新、刪除、添加數(shù)據(jù)等操作，獲取ODBC的錯(cuò)誤信息等。Property對(duì)象：?jiǎn)为?dú)的一個(gè)Property對(duì)象，提供屬性功能。用于與立即更新模式相反的批更新模式。提供者使用開放式鎖定，只在調(diào)用Updata方法時(shí)鎖定記錄。提供者執(zhí)行必要的操作確保成功編輯記錄，通常采用立即鎖定數(shù)據(jù)源的記錄的方式?！馬ecordset對(duì)象的LockType屬性的設(shè)置值常量值說(shuō)明adLockReadOnly1默認(rèn)值，只讀。Command對(duì)象：定義對(duì)數(shù)據(jù)庫(kù)源操作的命令。⑺ ADO屬于Free_threaded對(duì)象，利用它可以開發(fā)出更有效的Web應(yīng)用程序。⑸ 先進(jìn)的Recordset數(shù)據(jù)高速緩存管理功能。⑶ 支持分批修改數(shù)據(jù)庫(kù)內(nèi)容。利用ADO開發(fā)網(wǎng)絡(luò)數(shù)據(jù)庫(kù)應(yīng)用程序有以下幾個(gè)優(yōu)點(diǎn)：⑴ 支持客戶機(jī)/服務(wù)器結(jié)構(gòu)（Client/Server）與Web系統(tǒng)開發(fā)技術(shù)?？砂阉cASP結(jié)合起來(lái)，建立提供數(shù)據(jù)庫(kù)信息的網(wǎng)頁(yè)內(nèi)容，對(duì)數(shù)據(jù)庫(kù)進(jìn)行查詢、插入、更新、刪除等操作，并可以把在用戶端實(shí)現(xiàn)“網(wǎng)上實(shí)時(shí)更新顯示”的最新Web數(shù)據(jù)庫(kù)技術(shù)。ADO對(duì)象能夠存取到數(shù)據(jù)庫(kù)的內(nèi)容，首先要求數(shù)據(jù)庫(kù)的驅(qū)動(dòng)程序( ODBC驅(qū)動(dòng)程序與OLE DB驅(qū)動(dòng)程序)必須安裝上，否則，ADO對(duì)象是無(wú)法存取數(shù)據(jù)庫(kù)中內(nèi)容，：客戶端客戶端客戶端ADO對(duì)象各種數(shù)據(jù)庫(kù)所對(duì)應(yīng)的驅(qū)動(dòng)程序各種數(shù)據(jù)庫(kù)(如Access、SQL Server以及Oracle等) ADO對(duì)象存取數(shù)據(jù)原理示意圖請(qǐng)注意：上圖中的“各種數(shù)據(jù)庫(kù)所對(duì)應(yīng)的驅(qū)動(dòng)程序”即ODBC驅(qū)動(dòng)程序與OLE DB驅(qū)動(dòng)程序。它可以把大部分?jǐn)?shù)據(jù)源可編程的屬性直接擴(kuò)展到Active Server上，主要含有Connection、Recordset與Command三種對(duì)象。此外，與Windows 2000的集成還使SQL Server能夠充分利用操作系統(tǒng)所提供的服務(wù)和功能（如安全管理、事件日志、性能監(jiān)視器、內(nèi)存管理和異步I/O等），從而增強(qiáng)了SQL Server數(shù)據(jù)庫(kù)系統(tǒng)的功能，并且只需要占用很少的系統(tǒng)資源。6．簡(jiǎn)單的管理方式。SQL Server 2000既能運(yùn)行在Windows桌面操作系統(tǒng)下，又可運(yùn)行在服務(wù)器操作系統(tǒng)（包括Windows NT和Windows 2000）下；既能運(yùn)行在單CPU計(jì)算機(jī)上，又能運(yùn)行在對(duì)稱多處理系統(tǒng)下。此外，SQL Server 2000還支持ODBC、OLE DB、ADO規(guī)范，可以使用ODBC、OLE DB、ADO接口訪問(wèn)SQL Server數(shù)據(jù)庫(kù)。4．豐富的編程接口工具，使用戶開發(fā)SQL Server數(shù)據(jù)庫(kù)應(yīng)用程序更加靈活。3．充分的Internet技術(shù)支持。2．動(dòng)態(tài)自動(dòng)管理和優(yōu)化功能。SQL Server企業(yè)管理器是一個(gè)基于圖形用戶界面（GUI）的集成管理工具，利用它可以配置管理SQL Server服務(wù)器、管理數(shù)據(jù)庫(kù)和數(shù)據(jù)庫(kù)對(duì)象、備份和恢復(fù)數(shù)據(jù)、調(diào)度任務(wù)和管理警報(bào)、實(shí)現(xiàn)數(shù)據(jù)復(fù)制和轉(zhuǎn)換操作等。 SQL Server數(shù)據(jù)庫(kù)特點(diǎn)概括起來(lái)，SQL Server 2000數(shù)據(jù)庫(kù)管理系統(tǒng)具有以下主要特點(diǎn)。SQL Server 2000提供的非常傻瓜的缺省安裝和使用模式，其上手難度并不比Access大。有了強(qiáng)大的性能和功能支持，再配合其一向?yàn)槿朔Q道的易用性，SQL Server可以說(shuō)成為了開發(fā)者手中的一柄利器！ 另外，目前國(guó)內(nèi)的一些關(guān)于微軟平臺(tái)的數(shù)據(jù)庫(kù)編程教程，喜歡使用Access作為數(shù)據(jù)庫(kù)平臺(tái)的案例，并展開相關(guān)的內(nèi)容。其實(shí)這是一種誤解。在經(jīng)歷了SQL Server ，微軟公司終于開始了大規(guī)模的業(yè)務(wù)。此外，還增強(qiáng)了安全性，保護(hù)防火墻內(nèi)外的數(shù)據(jù)。用它可以方便地管理數(shù)據(jù)庫(kù)和開發(fā)應(yīng)用程序，它使用了最先進(jìn)的數(shù)據(jù)庫(kù)構(gòu)架，與Windows NT/2000平臺(tái)緊密集成，具有完全的Web功能。我們?cè)诒鞠到y(tǒng)中利用數(shù)據(jù)管理器創(chuàng)建了數(shù)據(jù)庫(kù)及數(shù)據(jù)庫(kù)表，并采用了ADO數(shù)據(jù)訪問(wèn)技術(shù)。0中新增的對(duì)象，它是一個(gè)更簡(jiǎn)單的對(duì)象模型，它更好的集成了其它數(shù)據(jù)訪問(wèn)技術(shù)，并且對(duì)本地和遠(yuǎn)程數(shù)據(jù)庫(kù)均有共同的界面，可以取代DAO和RDO。使用RDO可以不用本地的查詢機(jī)就能訪問(wèn)ODBC數(shù)據(jù)源，這無(wú)疑將大大提高應(yīng)用程序的性能。借助程序代碼編寫，直接控制Jet數(shù)據(jù)庫(kù)引擎，配合數(shù)據(jù)庫(kù)控件，能夠開發(fā)出更具彈性且高效率的數(shù)據(jù)應(yīng)用程序。數(shù)據(jù)控件可以通過(guò)一些屬性的設(shè)置去鏈接某個(gè)數(shù)據(jù)庫(kù)文件，但是它本身并無(wú)法顯示數(shù)據(jù)庫(kù)各個(gè)記錄的內(nèi)容，必須在搭配其他具有數(shù)據(jù)感知（Data Aware）功能的控件對(duì)應(yīng)并顯示一個(gè)字段內(nèi)容，以方便地進(jìn)行記錄的瀏覽及編輯工作。數(shù)據(jù)控件是VB所提供的基本控件成員之一。1．3．1．4 數(shù)據(jù)庫(kù)開發(fā)中的三大工具Visual Basic在數(shù)據(jù)庫(kù)應(yīng)用程序的開發(fā)領(lǐng)域中，提供包含數(shù)據(jù)管理（DataManager），數(shù)據(jù)控件（Data Control）以及數(shù)據(jù)編程對(duì)象（數(shù)據(jù)訪問(wèn)對(duì)象（DAO）、遠(yuǎn)程數(shù)據(jù)對(duì)象（RDO）和ActiveX數(shù)據(jù)對(duì)象（ADO））等功能強(qiáng)大的工具，協(xié)助設(shè)計(jì)人員輕松的連接數(shù)據(jù)庫(kù)文件，并訪問(wèn)其中的數(shù)據(jù)，在功能方面與其他一些專業(yè)數(shù)據(jù)庫(kù)軟件（如FoxPro，Micosoft Access等）不相上下。除了數(shù)據(jù)操作和數(shù)據(jù)定義任務(wù)外，也可用Jet引擎來(lái)執(zhí)行其他的任務(wù)。Jet也支持使用許可，或是對(duì)單個(gè)表和查詢的訪問(wèn)級(jí)別（例如，只讀或讀寫可訪問(wèn)性）。Jet也提供對(duì)安全功能的支持。對(duì)于數(shù)據(jù)操縱，Jet支持使用SQL。Jet數(shù)據(jù)庫(kù)引擎提供了多種功能，Jet的數(shù)據(jù)定義功能支持對(duì)表、索引、查詢的創(chuàng)建、修改和刪除。1．3．1．3 Jet數(shù)據(jù)庫(kù)引擎Microsoft引擎為Visual Basic與數(shù)據(jù)庫(kù)的接口提供了基本的方法。VB可以訪問(wèn)的數(shù)據(jù)庫(kù)可以簡(jiǎn)單的分為三類，即：Microsoft Access格式數(shù)據(jù)庫(kù)，外部數(shù)據(jù)庫(kù)和ODBC數(shù)據(jù)庫(kù)。 1．3．1．2 VB 支持的數(shù)據(jù)庫(kù)系統(tǒng)VB支持對(duì)多格式的數(shù)據(jù)庫(kù)的訪問(wèn)和維護(hù)，無(wú)論是Access還是Foxpro中創(chuàng)建的數(shù)據(jù)庫(kù)，都可以用VB打開，對(duì)其進(jìn)行查詢、修改和刪除等操作。這些事件的順序，決定了代碼執(zhí)行的順序，因此應(yīng)用程序每次運(yùn)行