microsoftvisualbasic工具的使用及簡單程序開發(fā)

1、Microsoft VisualBasic 工具的使用及簡單程序開發(fā)( 總 36 頁)本頁僅作為文檔封面，使用時可以刪除This document is for reference only-rar21year.March實訓一、簡單 VB 應用程序開發(fā)【理論知識提要】為了能體現(xiàn)數(shù)據(jù)庫后臺作用和特點，有必要加一個前臺開發(fā)工具，在這里我VB VB VB 的開發(fā)環(huán)境和VB 的語言規(guī)范。一、VB 簡介VB Visual Basic 的縮寫，Visual 的含義是“”、“形象化的”，這個開Microsoft 公司出品的，是一種可視化編程工具?？梢暬幊痰奶攸c：通過調用控件，并為控制對象設置屬性，根據(jù)開

2、發(fā)者的需要，直接在窗口中進行用戶界面的布局設計，該項技術具有編程簡單、自動生成程序代碼、效率高的優(yōu)點，因而在當今的編程語言中被廣泛采用。二、VB 集成開發(fā)環(huán)境介紹新建工程界面介紹圖 圖 5-1 新建工程界面新建：列出了可創(chuàng)建的應用程序類型，一般常用的為“EXE”VB 相關教材，這里不再一一介紹；現(xiàn)存：列出了可以選擇和打開的現(xiàn)有工程。最新：列出了最近使用的工程類型。此對話框可以根據(jù)需要選擇每次啟動 VB 時是否顯示。這三個選項卡也可以通過 VB 中的“文件”菜單來選擇和打開。集成開發(fā)環(huán)境介紹5-1 EXE5-2 的集成開發(fā)環(huán)境。主菜單中常用菜單項功能介紹如下：文件：包含新建、打開和保存工程以及生

3、成可執(zhí)行文件等的命令。編輯：包含編輯命令、格式化、編輯代碼命令。視圖：包含顯示和隱藏集成開發(fā)環(huán)境閣員元素命令。和內容的命令，會隨著工程內容的變化而變化。格式：包括對齊窗口控件的命令。調試：包含常用的通用調試命令。運行：包含啟動、設置斷點和終止當前應用程序運行的命令。查詢：包含操作數(shù)據(jù)庫時的查詢命令以及其他數(shù)據(jù)訪問命令。窗口：包含調整、控制屏幕窗口布局命令。標題欄工具欄標題欄工具欄主菜單工程窗口工具箱屬性窗口5-3 工具欄界面窗體窗口窗體布局窗口圖 圖 5-2 系統(tǒng)集成開發(fā)環(huán)境界面在集成開發(fā)環(huán)境中，工具集成開發(fā)環(huán)境中，各個分對象界面介紹：添菜打保加單開添菜打保加單開存窗編工工體輯程程器對工數(shù)控象

4、具據(jù)件瀏箱庫管覽瀏理器覽器窗口撤重啟中結工屬窗銷復動斷束程性體資窗布源口局管窗理口器加切制 貼 找標準控件圖 圖 5-3 工具欄各個工具說明界面圖 圖 5-4 窗體窗口界面5-5 5-5 工程窗口界面“工程窗口”列出了當前工程所包括的文件清單?！肮こ獭保篤B 的一個應用程序，它包括工程文件（.vbp）、窗體文件對象下拉列表框排序選項卡指針圖片框標簽文本框對象屬性列表框架命令按鈕復選框單選鈕組合框列表框水平滾動條對象下拉列表框排序選項卡指針圖片框標簽文本框對象屬性列表框架命令按鈕復選框單選鈕組合框列表框水平滾動條垂直滾動條定時器驅動器列表框目錄列表框文件列表形狀控件直線圖像控件數(shù)據(jù)控件對象屬性說

5、明OLE容器5-7 對象屬性說明界面圖 圖 5-6 工具箱各個工具說明界面工具箱中的工具就像機械零件的模具一樣，利用模具作出零件，利用工具作出控件。住鼠標左鍵拖動，也可作出這種控件。名稱，右邊是可以查看和修改的屬性值VB 程序的一般步驟設計用戶界面（界面設計要友好，通過向窗體上添加控件及調整控件位置來實現(xiàn)）設置屬性（設置對象的特征，有四種方法打開屬性窗口：“視圖”菜單- “屬性窗口”；F4 鍵；工具欄“屬性”按鈕；使用對象的上下文菜單， 掌握一種即可）編寫代碼（為對象編寫代碼，代碼要正確易讀同時運行效率高；打開代碼窗口有多種方法：雙擊對象；“視圖”菜單-“代碼窗口”；使用對象的上下文菜單；在工

6、程窗口單擊查看代碼圖標等等）保存和運行調試程序，生成 EXE 文件（注意保存時要根據(jù)提示一一保存，對于生成的 EXE 文件是不可編輯的）三、基本概念對象：事物都可稱作對象，比如計算機、鼠標就是對象，在 Visual Basic 里對象主要分為兩類：窗體（Form）和控件（Control）。窗體（Form）：窗體或稱表單，其實指的就是 Window?？丶–ontrol）：控件，指的是各種按鈕、選項卡、對話框等。事件：事件是發(fā)生在對象上的動作。每個對象能識別的只是一組預先定義好的事件。但并非每個事件都會產(chǎn)生結果事件過程：對象感應到某一事件時所執(zhí)行的程序。方法：VB 隱藏對象，打印等。四、VB 數(shù)

7、據(jù)類型數(shù)據(jù)類型關鍵字類型符占用字節(jié)有效范圍字節(jié)型Byte無10255邏輯型Boolean無2True 或 False整型Integer%2-3276832767長整型Long&4-4847單精度型Single！4+雙精度型Double#8+貨幣型Currency8日期型Date無801,01,10012,31,9999字符型變體型StringVariant$無每字符 1065535 個字符上述有效范圍之一在 VB 中除了基本類型外還有自定義類型和數(shù)組類型，自定義形式如下：Type 自定義類型名元素名 As 類型名元素名 As 類型名元素名 As 類型名End Type數(shù)組類型定義如下：說明符數(shù)

8、組名(下標) As 數(shù)據(jù)類型說明符數(shù)組名(下標下界 To 下標上界) As 類型例：Dima(10)AsInteger定義a 數(shù)組，共11 個元素下標從0 到Dim a(1 to 5)AsInteger定義a 數(shù)組，下標從1 到5 共5 個元素五、VB 變量聲明及命名規(guī)則用戶聲明常量Public|PrivateConst 常量名As 類型=表達式例：Const Pi=Public Const Maxnumber AsInteger=1000 Const StuName=”StudentName”Dim 語句聲明變量Dim As 例：Dimnum1AsIntegerDim StuName As

9、String*8 Dim X1,X2 As Byte,d1 AslongStaticPublic、Private 語句聲明變量Static As ,As 聲明過程級靜態(tài)變量Public As ,As 聲明全局變量Private 變量名As ,As 聲明模塊級變量4隱式說明利用類型說明符號進行變量類型說明的方式稱為隱式聲明方式，例：Dim x1%,x2%,x3&等價于 Dim x1,x2 As Integer,x3 As Long5變量名命名規(guī)則在 VB 中變量名的命名規(guī)則為：第一個字符必須為字母，變量名第 2 個字符及以后字符可以是字母、數(shù)字和下劃線，變量名的長度必須小于 255 個字符，不能

10、將 VB 的保留字作為變量名，構成變量名的字母不區(qū)分大小寫，變量名中間不能有空格，在同一個程序模塊中不允許有相同的變量名。六、VB 運算符算術運算符運算符含義舉例結果優(yōu)先級指數(shù)2381-取負-100-1002*乘3*9273/除5/23整除5224Mod取模5Mod215+加3+586-減3-5-27關系運算符運算符含義舉例結果=等于“1234”=”129”False大于“1234”129”False=大于等于56=23True小于4554True=小于等于“XY”=”YZ”True不等于“sss”SSS”True邏輯運算符運算符Not含義取反舉例Not(53)結果Flase說明結果與操作數(shù)的

11、值相反And與(2=1)And(“c”a”)True兩個表達式均為真時結果為真Or或(7=8)True兩個表達式一個為真時結果為真Xor異或(4=7)Xor(93)False兩個表達式的值相異時結果為真Eqv等價(12)Eqv(“a”3)Imp(35)False第一操作數(shù)為真，第二位假，結果為假4字符串連接運算符例子結果“AB”&”C”“ABC”“x=”&x=“AB”+”C”“ABC”“100”+200“AB”+200300出錯5日期時間運算符例子例子#11/20/2004#+30 #11/20/2004#-#10/20/2004# #11/20/2004# #11/20/2004#字符串連接

12、運算符（&）-關系運算符-邏輯運算符；算術運算符的優(yōu)先順序為：-（負號）-*-/-Mod-+-；邏輯運算符由高到低的優(yōu)先順序為：Not-And-Or-Xor-Eqv-Imp。七、VB 常用內部函數(shù)類型轉換函數(shù)函數(shù)名功能舉例返回值Asc(C)字符轉換成 ASCII 值Asc(“A”)65Chr$(N)ASCII 值轉換成字符Chr$(65)“A”Str$(N)數(shù)值轉換成字符串Str$“16.78”Val(C)字符串轉換為數(shù)值Val(“12”)=820數(shù)學運算符函數(shù)名功能舉例返回值Abs(N)取絕對值Abs(-5)5Cos(N)余弦函數(shù)Cos(0)1Exp(N)e 為底的指數(shù)函數(shù) exExp(3)

13、Fix(N)取整Fix3Hex$(N)十進制轉換為十六進制Hex$(255)FFInt(N)取小于或等于 N 的最大整數(shù)Int2Int-3Lcase$(C)大寫字母轉換為小寫字母Lcase$(“XYZ”)“xyz”Log(N)以 e 為底的自然對數(shù)Log(10)Oct$(N)十進制轉換成八進制Oct(100)144Rnd(N)產(chǎn)生隨機數(shù)Rnd01 之間的數(shù)Sin(N)正弦函數(shù)Sin(0)0Sgn(N)符號函數(shù)Sgn-1Sqr(N)平方根Sqr(25)5Tan(N)正切函數(shù)Tan(0)0Ucase$(C)小寫字母轉換為大寫字母Ucase$(“xyz”)“XYZ”3字符串函數(shù)函數(shù)名功能舉例返回值L

14、eft$(C,N) Len(C)Ltrim$(C)Left$(C,N) Len(C)Ltrim$(C)C1 N1 C2 一個字符的位置N 返回字符串的長度去掉字符串左邊空格 N1 取 N2 個字符N 去掉字符串右邊空格 N C 中首字符組成的N 個字符Instr(2,”abcdef”,”de”)4Len(“abcdef”)Ltrim$(“abc”)“abcd”6“abc”Mid$(C,N1,N2)Mid$(“abcdef”,2,4)“bcde”Right$(C,N)Rtrim$(C)Space$(N)Rtrim$(“abcd”)Space$(4)“cdef”“abcd”“”String$(N,

15、C)String$(4,”abcdef”)“aaaa”函數(shù)名DateTime功能舉例DateTimeNow返回系統(tǒng)日期和時間Now返回值2009-9-1018:20:002009-9-10Day返回日期（131）Day(“2009,9,10”)18:20:0010Month返回月份（112）Month(“2009,9,10”)9Year返回年份Year(“2009,9,10”)2009Weekday返回星期幾（17）Weekday(“2009,9,10”)5(星期四)Hour返回小時（023）Hour(“9:36:55 PM”)21MinuteMinuteSecond（059）（059）Min

16、ute(“9:36:55PM”)Second(“9:36:55PM”)3655八、VB 流程控制VB 流程控制語句和其他高級語言相同也分為：順序結構、選擇結構、循環(huán)結構。1選擇結構選擇結構分為四種：“單行結構”條件語句、“塊結構”條件語句、“嵌套結構”條件語句、多分支條件語句。“單行結構”條件語句格式：If 條件 Then 語句組 1 Else 語句組 21注意：整個語句必須在一行，如果語句組中語句多于一條，則用冒號分隔；Else 部分不是必須的，可根據(jù)需要進行添加或缺省。舉例：找兩個數(shù)最大值If xy then max=x else max=y格式：If 語 句 塊 1 Else語句塊 2E

17、nd If功能：同“單行結構”條件語句功能； 注意：“塊結構”的使用必須和上面的格式嚴格一樣；Then 后的語句塊 1 必須放在 Then 的下一行；Else 2 Else Else 后必須有冒號（如沒有，系統(tǒng)會自動添加），Else 的下一行；End if 是塊結束的標志不能省略。舉例：找兩個數(shù)中最大值If xy max=x Elsemax=y End if“嵌套結構”條件語句在語句組中又包含條件格式，稱為“嵌套結構”條件語句。舉例：成績轉換成五級制If x=95 Then Print”優(yōu)”ElseIf x=85 Then print”良”ElseIf x=75 Thenprint”中” En

18、d if多分支條件語句格式：Select case 測試表達式case 表達式列表 1語句塊 1case 表達式列表 2語句塊 2case else語句塊 n+1End case 2循環(huán)結構循環(huán)結構分為 ForNext 循環(huán)、DoLoop 循環(huán)、WhileWend 循環(huán)。ForNext 格式：For 循環(huán)控制變量=To Step 1Exit For語句塊 2Next循環(huán)控制變量說明：For Next 必須成對出現(xiàn)；初值、終值和步長為數(shù)值型表達式； 步長不能為 0，為 1 時可以省略；Exit For Next 語句，繼續(xù)執(zhí)行下面語句序列。1 100 之間的偶數(shù)和Y=0For i=2 To 10

19、0 step 2 Y=Y+iNext i Print YDoLoop 1：DoExit Do 語 句 塊 2 LoopWhile|Until 循環(huán)條件 說明：Do Loop 必須成對出現(xiàn)循環(huán)條件用邏輯表達式寫，True 成立,False 不成立用 While 時，循環(huán)條件為 True 執(zhí)行循環(huán)體，F(xiàn)alse 結束循環(huán)，Until 和While 正好相反1 100 之間的奇數(shù)和Y=0i=1 DoY=Y+i:i=i+2Loop while i=99 print Y格式 2：Do While|Until 1Exit DoLoopWhileWend 格式：While 條件語句塊Wend1 100 之間

20、的奇數(shù)和Y=0i=1while i=99 Y=Y+ii=i+2 wend print【實驗要求】對于驗證性實驗，要求學生按照具體的實驗步驟完成相應的作品制 作，并保存在相應的盤符下（包括一個工程文件、5 夾、一個圖片文件夾），以備按教師要求上交作業(yè)。由于本部分實驗是為數(shù)據(jù)庫的開發(fā)打基礎，并不是該課程的重點，所VB 自學。因，如果不能自己解決應及時請教教師或同學?！掘炞C性實驗】VB 4 個界面： 合框使用界面。5-9 字體格式界面具體實現(xiàn)界面如圖 5-8，5-9，5-10，5-11，5-9 字體格式界面圖 圖 5-8 主界面5-10 數(shù)值計算界面5-11 定時器圖片界面（2 秒換一次圖片）5-1

21、0 數(shù)值計算界面5-11 定時器圖片界面（2 秒換一次圖片）5-12 組合框列表框界面caption 屬性值為“多功能主窗體”如圖 5-13 所示：1VB VB 5-1 所示的EXEVB 5-2 Form1 caption 屬性值為“多功能主窗體”如圖 5-13 所示：5-14 菜單編輯器界面5-15 菜單編輯完成界面25-14 的界面。在“標題”中輸入菜單顯示的內容，在“名稱”中輸入菜單的名稱（菜5-14 菜單編輯器界面5-15 菜單編輯完成界面5-1 菜單標題名稱3】建立工具欄：工具欄是將菜單中的功能以快捷工具按鈕的形式進VB 中實現(xiàn)工具欄需要兩個控件，toolbar imagelist，

22、這兩個控件屬5-1 菜單標題名稱3】建立工具欄：工具欄是將菜單中的功能以快捷工具按鈕的形式進VB 中實現(xiàn)工具欄需要兩個控件，toolbar imagelist，這兩個控件屬activeX 控件的一部分，在使用前，需要在工具箱的空白區(qū)域單擊鼠標右鍵， 5-17 5-18 所示的“部件”對話框， t6s0”復選框，單擊“確定”退出m_exit5-19 toolbar imagelist 界面5-20 imagelist 屬性界面toolbar 控件，然后單擊窗體，在窗體的菜單欄下將出現(xiàn)一條灰色無網(wǎng)格區(qū)域，這個區(qū)域就是工具欄的最imagelist imagelist 的小圖標，具體5-19 在做工具

23、欄之前，需要將放在工具欄上的圖標保存到相應的文件夾內（這里需要用到四個圖標）。imagelist 小圖標上右擊，在彈出5-20 image 屬性界面，在“圖像”選項卡中利用“插入圖片”按鈕將保存在指定位置的小圖標插入進來，默認情12，以后依此類推。四個圖片都imagelist toolbar 屬性form1 toolbar 控件，在彈出式菜單中選擇“屬性”菜單5-21 5-19 toolbar imagelist 界面5-20 imagelist 屬性界面toolbar1 個按鈕，修改相應的“圖像”后的索引值（imagelist1 中的圖片索引對應）， 單擊“應用”按鈕和“確定”按鈕，這時我們

24、的工具欄就做好了。圖 5-17 圖 5-17 添加部件圖 5-18 部件對話框界面imagelist 控件，toolbar 也能完成工具欄的制作，同時可以通toolbar 個的灰色圖標，界面友好性較差。5-23 添加窗體界面5-24 新窗體界面4】建立字體格式設置界面：利用“工程”菜單下“添加窗體”菜單項（或工具欄“添加窗體”按鈕）5-23 選擇“窗體”，單擊“打開”按鈕，這時在開發(fā)區(qū)出現(xiàn)了默認名為“form2”的5-24 form2 5-2 所示添加新控件并設置控件屬5-23 添加窗體界面5-24 新窗體界面5-2 “字體格式窗體”控件說明5-25 字體格式界面5-2 “字體格式窗體”控件說

25、明5-25 字體格式界面5-3 數(shù)值計算界面控件說明5-26 數(shù)值計算界面5】建立數(shù)值計算界面：實現(xiàn)數(shù)據(jù)的求絕對值和求，5-3 數(shù)值計算界面控件說明5-26 數(shù)值計算界面6】建立定時器圖片瀏覽界面：要建立圖片瀏覽界面，首先必須先建立圖庫，也就是在指定的位置存放一定數(shù)量的圖片，以備瀏覽時顯示（picture 1 10 個.jpg 文件）。這里具體5-45-27。5-5 列表框組合框界面控件說明5-28 列表框組合框界面5-4 圖片瀏覽界面控件說明5-5 列表框組合框界面控件說明5-28 列表框組合框界面5-4 圖片瀏覽界面控件說明5-27 圖片瀏覽界面VB開發(fā)的一般步驟，界面和界面總體風格設計好

26、后就可以進行代個窗體中完成的，各個窗體的切換可以再“工程”窗口通過鼠標雙擊實現(xiàn)?！繛椴藛魏凸ぞ邫谶M行代碼設計form1 中單擊“界面”菜單， m_font_click 5-29 所示，在此界面輸入如下程序語句：PrivateSubm_font_Click()form2 窗體End Sub事件選擇下拉框對象選擇下拉框圖 5-29 代碼設計界面事件選擇下拉框對象選擇下拉框依此方法，分別為“數(shù)值計算”、“定時器圖片”、“列表框組合框”、“退出”等菜單項設計代碼如下：Private Sub m_list_Click()End SubPrivate Sub m_number_Click()End Sub

27、Private Sub m_timer_Click()End SubPrivate Sub m_exit_Click() EndEnd Sub工具欄中的圖標分別與各個下拉菜單項建立聯(lián)系，利用 selectcase 結構，具體代碼如下：Private Sub Toolbar1_ButtonClick(ByVal Button AsSelectCase利用toolbar 按鈕的index 為判定值Case1第一個按鈕鏈接“字體格式”菜單Callm_font_ClickCase2第二個按鈕鏈接“數(shù)值計算”菜單項Call m_number_ClickCase3Callm_timer_ClickCase

28、4Callm_list_ClickEnd Select End Sub代碼設計好后，關閉代碼設計界面。件是該控件最常用的事件，我們在編碼設計時往往是對默認事件進行編程。10】為字體格式設置界面進行代碼設計：鈕的單擊事件編寫代碼，實現(xiàn)單選鈕和檢查框對字體的格式設置，具體代碼如 下：Private Sub Command1_Click()IfTrueThen利用單選鈕的值設置字號= 5ElseIf = True Then= 10ElseIf = True Then= 20End IfIf1Then利用復選框的值設置其他效果= &HFF& End IfIf = 1 Then= True End If

29、If = 1 Then= True End If End Sub代碼設計好后，關閉代碼設計界面。11】為數(shù)值計算界面進行代碼設計：“求和”兩個命令按鈕進行代碼設計。“求絕對值”命令按鈕單擊事件代碼設計如下：Private Sub Command1_Click()If Int0Thenint 將字符串轉換為數(shù)字Str(-Int)str 將數(shù)字轉換為字符串Else: = Str End IfEnd Sub Private SubCommand2_Click()Dim i As Integer, y As Integer y = 0i = 1For i = 1ToIntfor 循環(huán)實現(xiàn)求和操作y =

30、 y + i Next=Str(y)EndSub代碼設計好后，關閉代碼設計界面?！静襟E 12】為定時器圖片瀏覽界面進行代碼設計：該界面的運行流程是，在窗體第一次出現(xiàn)時首先應出現(xiàn)第一幅圖片，同時需要在窗體加載時設置定時器的時間間隔，然后利用定時器的 timer 事件進行圖片的連續(xù)播放，播放間隔為窗體加載時設計的時間間隔。定時器和窗體對于圖片的名稱和圖片的數(shù)目等變量是共享的，所以還需要設置通用變量。form load 事件，雙擊窗體的空白區(qū)域，在代碼設計界面首所示的“對象選擇下拉框”中選擇“通用”，然后輸入如下變量定義：Dim picnum As Integer Dim picname As St

31、ringformform load 事件編寫如下代碼：Private Sub Form_Load() picnum = 1picname =E:2008 級數(shù)據(jù)庫VB 作品picture & picnum & .jpg 圖片保存在相應目錄下的 picture 文件夾內，并以，等命名= + picname= LoadPicture(picname)= 2000= True End Subtimer1 timer1 timer 控件編寫如下代碼：Private Sub Timer1_Timer()If picnum10Then10 幅圖片picname = E:2008 級數(shù)據(jù)庫VB 作品pict

32、ure & picnum & .jpg= picname= LoadPicture(picname) picnum = picnum + 1ElseIf picnum10Then10 則重新從頭循環(huán)顯示picnum = picnum - 10picname = E:2008 級數(shù)據(jù)庫VB 作品picture & picnum & .jpg= picname= LoadPicture(picname) picnum = picnum + 1End If End Sub“退出”命令按鈕的單擊事件代碼如下：Private Sub Command1_Click() EndEnd Sub代碼設計好后，關

33、閉代碼設計界面。13】為列表框和組合框界面進行代碼設計：form load 事件添加代碼，目的在于為“班級列表”對應的組合框添加具體的班級（也可以combo1 listdata 屬性進行設置），雙擊窗體的空白區(qū)域，打開代碼設計界面，代碼設計如下：Private SubForm_Load() 991991991991信息 991電商 991End Sub為“加入條目”命令按鈕單擊事件編寫如下代碼，目的在于將文本框和組合框中的內容加入到列表框內：PrivateSubCommand1_Click()表框內If ( ) And ) Then+ +ElseMsgBox(請輸入添加內容)文本框和組合框中無

34、內容時提示“輸入”End If End內容刪除：Private Sub Command2_Click() Dim i As IntegerIf0Then列表框中內容不空時，根據(jù)選擇的i 進行刪除For i = - 1 To 0 Step -1 If (i) Theni EndNext i End If End全部內容：Private Sub Command3_Click()End Sub代碼設計好后，關閉代碼設計界面。14擇“運行”菜單項下的“啟動”就可以運行我們設計的作品了，作品運行界面參5-8、5-9、5-105-11 5-12。實訓二、創(chuàng)建 ODBC 數(shù)據(jù)源【理論知識提要】一、數(shù)據(jù)訪問對

35、象模型VB ODBC、Jet 和ADO 等中間連接鍵，獲得對數(shù)據(jù)庫的前端連接；并能通過諸多數(shù)據(jù)感應可視控件，實現(xiàn)對數(shù)據(jù)的用戶界面操作。VB 可以訪問以下 3 類數(shù)據(jù)庫：Jet Jet VB 自帶的驗證數(shù)據(jù)庫、ACCESS 數(shù)據(jù)庫；ISAM 數(shù)據(jù)庫索引數(shù)據(jù)訪問方法數(shù)據(jù)庫，如 dBASE、FoxPro、TextFiles 和Paradox；ODBC 數(shù)據(jù)庫開放式數(shù)據(jù)庫連接，包括遵守 ODBC 標準的客戶/服務器數(shù)據(jù)庫，如 Microsoft SQL Server、Oracle、Sybase 等。VB 3 種：ActiveX 數(shù)據(jù)對象（ADO）；遠程數(shù)據(jù)對象（RDO）；數(shù)據(jù)訪問對象（DAO）。數(shù)據(jù)訪

36、問接口就是數(shù)據(jù)訪問對象模型，它代表了訪問數(shù)據(jù)的各個方面?？梢栽谌魏螒贸绦蚍N通過編程控制連接和語句生成器，也可以通過編程使用返回的數(shù)據(jù)。對于三種數(shù)據(jù)訪問接口我們常用的是最新技術 ADO。二、ODBC 含義及優(yōu)點ODBC（Open DataBase Connectivity，開放式數(shù)據(jù)庫連接），是 MicroSoft 公司推出的連接數(shù)據(jù)庫的標準：ODBC 具有以下優(yōu)點：ODBC 提供了能訪問大量數(shù)據(jù)庫的單一接口；ODBC 三、ODBC 的組成ODBC 由如圖 6-1 所示的幾部分組成：ODBC API 來建SQL 命令操縱數(shù)據(jù)庫；ODBC 組合方式，其中，遠程操作系統(tǒng)和網(wǎng)絡并不是必須的；ODBC

37、 程序之間的中介；ODBCAPI。它SQL 客戶應用程序ODBC 數(shù)據(jù)源ODBC 驅動程序管理器SQL Server驅動程序Oracle驅動程序VF驅動程序針對“教學成績管理”數(shù)據(jù)庫創(chuàng)建 ODBC 數(shù)據(jù)源?！静襟E 1】首先應確?！敖虒W成績管理”數(shù)據(jù)庫已經(jīng)附加到了 SQL Server 數(shù)SQL 數(shù)據(jù)庫OracleVisual Foxpro數(shù)據(jù)庫2“設置” “控制面板” “管理工具”“數(shù)據(jù)源（ODBC）”，打開如圖 6-2 所示的 ODBC 數(shù)據(jù)源圖 6-1 ODBC 體系結構管理器，在這個對話框中選擇“系統(tǒng) DSN”，出現(xiàn)如圖 6-3 所示的系統(tǒng)數(shù)據(jù)源配6-2 ODBC 6-2 ODBC 數(shù)據(jù)

38、源管理器6-3 配置系統(tǒng)數(shù)據(jù)源面。36-3 6-4 6-5 SQL Server 數(shù)據(jù)源界面?！静襟E 4】在圖 6-5 所示界面的名稱欄中輸入“jxcjgl”，在描述欄中輸入“教學成績管理數(shù)據(jù)庫”，在服務器欄中輸入所要連接的服務器名稱（SQL 所在的服務器）這里為本地機名稱“zhychang6-6 所示，單擊“下一6-6 設置數(shù)據(jù)源名稱和服務器6-7 SQL Server 方式6-7 SQL Server 方式，這SQL Server 時設置的登錄方式應一致，在這里設置為“使用用ID SQL Server 6-6 設置數(shù)據(jù)源名稱和服務器6-7 SQL Server 方式SQL Server I

39、D Windows 混合登錄方ID Windows NT SQL Server 登錄驗證?！静襟E 5】在圖 6-7 所示界面單擊“下一步”進入更改默認數(shù)據(jù)庫界面如圖所示，將默認數(shù)據(jù)庫改為“教學成績管理”，其他內容不動，單擊“下一步”按鈕，進入最后一個界面，如圖 6-9 所示，在此界面不作改動只用默認值，單擊“完成”按鈕，完成對數(shù)據(jù)源的創(chuàng)建，最后在如圖 6-10 所示的界面，單擊6-11 所示界面，單擊“取消”，數(shù)據(jù)源創(chuàng)建完成。圖 6-8 圖 6-8 設置默認數(shù)據(jù)庫圖 6-9 完成界面圖 6-10 圖 6-10 數(shù)據(jù)源配置信息圖 6-11 數(shù)據(jù)源測試成功數(shù)據(jù)源 jxcjgl 對應的后臺數(shù)據(jù)庫為“

40、教學成績管理”。能如下：DSN：ODBC戶數(shù)據(jù)源只對當前的用戶可見，而且只能應用在本機上。DSN：ODBC統(tǒng)數(shù)據(jù)源對當前機器上的所有用戶都可見。DSN：ODBC DSN 可以由安裝了相同驅動程序的用戶共享。驅動程序：ODBC ODBC ODBC 數(shù)據(jù)源獲取信息。跟蹤：ODBC ODBC 驅動程序的日志，以供技術支持人員查看。也可以輔助調試應用程序。Tracing MicrosoftVisualStudio 的ODBC 跟蹤。存入服務器?！咀灾鏖_發(fā)設計實驗】根據(jù)實驗四中創(chuàng)建的“零件供銷系統(tǒng)”數(shù)據(jù)庫創(chuàng)建數(shù)據(jù)源。數(shù)據(jù)源的名稱為“l(fā)jgxxt”?！緦嶒炓蟆抗Φ幕A上熟練創(chuàng)建數(shù)據(jù)源。師的要求完成，旨在

41、培養(yǎng)學生熟練創(chuàng)建數(shù)據(jù)源的技能。案，并寫出具體的錯誤原因和解決策略。實訓三、VB 數(shù)據(jù)庫開發(fā)簡單實例【理論知識提要】ADO Data 控件相關知識。ADO Data 控件（簡稱 ADO 控件）是中文版提供的一個 ActiveX 控件，與 VB固有的 Data 控件相似。使用 ADO 控件，可以通過“Microsoft ActiveX Data Objects（ADO）快速建立數(shù)據(jù)綁定的控件和數(shù)據(jù)提供者之間的連接。ADO 控件可以實現(xiàn)如下功能：連接本地數(shù)據(jù)庫或遠程數(shù)據(jù)庫；打開指定的數(shù)據(jù)表，或定義基于結構化查詢語言（SQL）過程或該數(shù)據(jù)庫中表的視圖記錄集合；更改這些數(shù)值；添加新記錄或根據(jù)更改顯示在綁

42、定的控件中的數(shù)據(jù)來更新數(shù)據(jù)庫。 ADO 控件，需要在“工具”-“部件”對話框中將“MicrosoftADOData （OLE DB）”選項選中?！掘炞C性實驗】在 VB 中實現(xiàn)對數(shù)據(jù)庫的連接1VB EXEVB 的集成開發(fā)環(huán)境。2項，在出現(xiàn)的“引用”列表中選中如下選項：Visual Basic For ApplicationVisual Basic runtime objects and procedure Visual Basic object and procedureOLE AutomationMicrosoft ActiveX Data Object Library將復選框選中后，單擊“確

43、定”按鈕【步驟 3】添加“部件”：在“工程”菜單中選擇“部件”菜單項（或在工具箱的空白區(qū)域單擊鼠標右鍵，在彈出式菜單中選擇“部件”菜單項），在出現(xiàn)的“部件”對話框中選中如下選項：Microsoft ADO Data （OLEDB） Microsoft DataGrid （OLEDB） Microsoft DataList Controls （OLEDB）Microsoft Windows Common Controls （SP4）將復選框選中后，單擊“應用”按鈕，然后單擊“關閉”。注意：相應的“引用”和“部件”添加好后，就可以進行數(shù)據(jù)源的連接和數(shù)據(jù)表的顯示了。7-2 VB 中實現(xiàn)對后臺數(shù)據(jù)庫中

44、數(shù)據(jù)表的瀏覽：17-1 datagrid Adodc，然后在adodc 控件加入到了窗體中，然datagrid 7-1 所示，7-1 添加數(shù)據(jù)控件界面7-2 屬性頁界面2adodc1 控件屬性，adodc 樣，它是通過在控件上單擊鼠標右鍵，然后在彈出式菜單中選擇“adodc 屬性” 7-1 添加數(shù)據(jù)控件界面7-2 屬性頁界面“通用選項卡”設置連接資源的方法，可以有三個選擇，一般選擇“使用ODBC 數(shù) 據(jù) 資 源 名 稱 ” 和 “ 使 用 連 接 字 符 串 ”； 登錄方式一致； 在這里主要描述選擇“使用 ODBC 數(shù)據(jù)資源名稱”的連接方式，在“身份驗證”界面中輸入用戶名和用戶口令，“用戶名”和“用戶口令”與我們設計數(shù)據(jù)源和登錄數(shù)據(jù)庫服務的方式相同。在“記錄源”的“命令類型”中選擇第 2 種， “2-adcmdtable”，在“表和存儲過程”中選擇要顯示的數(shù)據(jù)表，最后單擊“確定”，具體界面如圖 7-3，7-4，7-5 所示。圖7-3 連接資源設置圖7-4 身