【文章內(nèi)容簡介】 ? 其中 “ 類型說明 ” 表示文件列表內(nèi)各個文件類型的說明文字 ， 如 “ 所有文件 （ *.*） ” ； “ 擴展名 ”用來指定文件類型 ， 如 “ *.bmp。*.ico”。 Filter屬性是字符型 ， 需要用雙引號將整個類型說明引起來， 如 “ 所 有 文 件 （ * .* ） |*.*| 位圖(*.bmp)|*.bmp|JPEG圖像 (*.jpg)|*.jpg|GIF圖像(*.gif)|*.gif”。 1032 “ 打開 ” 與 “ 另存為 ” 對話框 計算機基礎(chǔ)教研室 ? 通 過 使 用 CommonDialog 控 件 對 象 的ShowColor 方法或 Action屬性值的設(shè)置可顯示 “ 顏色 ” 對話框 。 “ 顏色 ” 對話框用以從調(diào)色板選擇顏色 ， 或是創(chuàng)建和選擇自定義顏色 。 1033 “ 顏色 ” 對話框 計算機基礎(chǔ)教研室 ? 使用 “ 顏色 ” 對話框 ， 需要首先設(shè)置CommonDialog控件對象中與顏色對話相關(guān)的屬性 。 然后使用 ShowColor方法或 Action屬性值的設(shè)置顯示對話框 ， 運行時 ， 選定顏色并關(guān)閉對話框后可用 CommonDialog對象的Color屬性獲取選定的顏色 。 ? 為了該屬性能返回 “ 顏色 ” 對話框中的一種顏色 ， 必須先設(shè)置 CommonDialog控件對象的cdlCCRGBInit標(biāo)志以規(guī)定顏色的初始值 。 ? 公共對話框?qū)ο?.Flags = cdlCCRGBInit 1033 “ 顏色 ” 對話框 計算機基礎(chǔ)教研室 ? 字體對話框用于選擇文本的字體 、 字形 、 字號等效果 。 Visual Basic使用 CommonDialog控件的ShowFont方法或 Action屬性值 （ 公共對話框?qū)ο?Action=4） 的設(shè)置來顯示標(biāo)準(zhǔn)的 “ 字體 ” 對話框。 1034 “ 字體 ” 對話框 計算機基礎(chǔ)教研室 ? 顯示 “ 字體 ” 對話框之前必須將 CommonDialog控件的 Flags屬性設(shè)置為下列數(shù)值之一 ， 否則將發(fā)生不存在字體錯誤 。 ? cdlCFScreenFonts（ 只顯示屏幕字體 ） ? cdlCFPrinterFonts（ 只顯示打印機字體 ） ? cdlCFBoth（ 既顯示屏幕字體又顯示打印機字體 ） ? 如果需要字體對話框設(shè)置字體的刪除線 ， 下劃線， 以及顏色效果 ， 需要設(shè)置對話框的下面 Flags屬性 。 ? cdlCFEffects（ 它指定對話框允許刪除線 ， 下劃線 ， 以及顏色效果 。 ） 1034 “ 字體 ” 對話框 計算機基礎(chǔ)教研室 ? “字體 ” 對話框通過一組屬性來返回給程序用戶在對話框內(nèi)選擇的有關(guān)字體的信息 。 1034 “ 字體 ” 對話框 屬性 說明 Color 選定的顏色。如要使用這個屬性，必須先將 Flags屬性設(shè)置為cdlCFEffects。 FontBold 是否選定了粗體。 FontItalic 是否選定了斜體。 FontStrikethru 是否選定刪除線。如要使用這個屬性，必須先將 Flags屬性設(shè)置為 cdlCFEffects。 FontUnderline 是否選定下劃線。如要使用這個屬性，必須先將 Flags屬性設(shè)置為 cdlCFEffects。 FontName 選定字體的名稱。 FontSize 選定字體的大小。 計算機基礎(chǔ)教研室 ? “打印 ” 對話框用于確定打印輸出的有關(guān)設(shè)置 。 用戶在對話框內(nèi)可以指定打印頁數(shù)范圍 、 打印質(zhì)量 、 復(fù)制數(shù)目等等 。此對話框還顯示有當(dāng)前安裝的打印機信息 ， 并允許用戶進行配置或重新安裝新的缺省打印機 。 1035 “ 打印 ” 對話框 計算機基礎(chǔ)教研室 ? 通過使用 CommonDialog控件對象的 ShowPrinter方法或 Action屬性值 （ 對話框?qū)ο?.Action=5） 的設(shè)置可顯示 “ 打印 ” 對話框 。 在 “ 打印 ” 對話框內(nèi)可以進行如下有關(guān)打印的屬性設(shè)置 。 1035 “ 打印 ” 對話框 屬性 說明 Copies 要打印的份數(shù)。 FromPage 打印的起始頁。 ToPage 打印的結(jié)束頁。 hDC 選定打印機的設(shè)備上下文。 計算機基礎(chǔ)教研室 1． 對話框分為哪幾種 ？ 各有什么特點 ， 如何在Visual Basic中實現(xiàn)這些對話框 ？ 2． 為了利用窗體制作自定義對話框 ， 需要設(shè)置窗體的那些屬性 ？ 3． 什么是模式與無模式對話框 ？ 4． 試編寫程序 ， 利用 “ 打開 ” 對話框給 image對象添加圖片 。 5． 試編寫程序 ， 利用 “ 字體 ” 與 “ 顏色 ” 對話框設(shè)置標(biāo)簽的文本屬性 。 104 思考題 計算機基礎(chǔ)教研室 第 11章 訪問數(shù)據(jù)庫 計算機基礎(chǔ)教研室 主要內(nèi)容 111 數(shù)據(jù)庫的基本概念 112 使用 Data控件訪問數(shù)據(jù)庫 113 使用 ADO訪問數(shù)據(jù)庫 114 使用 DAO訪問數(shù)據(jù)庫 計算機基礎(chǔ)教研室 111 數(shù)據(jù)庫基本概念 數(shù)據(jù)庫 是具有一定組織結(jié)構(gòu)的相關(guān)信息的集合 。 它是將一些相關(guān)的數(shù)據(jù)表組織在一起 ， 通過設(shè)置某些 功能 ， 使數(shù)據(jù)表之間建立關(guān)系 ， 這樣就構(gòu)成了一個完 整數(shù)據(jù)庫 。 1111 數(shù)據(jù)庫概念 數(shù)據(jù)庫（ DataBase，簡稱 DB）是指具有統(tǒng)一的 結(jié)構(gòu)形式并存放在計算機中的存儲介質(zhì)上、有組織 的、可共享的數(shù)據(jù)集合。 計算機基礎(chǔ)教研室 1. 數(shù)據(jù)庫、數(shù)據(jù)表基本概念 數(shù)據(jù)庫的結(jié)構(gòu)形式（即數(shù)據(jù)之間的聯(lián)系）稱為數(shù)據(jù) 模型。目前最為流行的是關(guān)系模型。關(guān)系模型是建立在 嚴(yán)格的數(shù)學(xué)理論基礎(chǔ)上，采用我們所熟悉的二維表格形 式來存儲數(shù)據(jù)。 一個關(guān)系對應(yīng)一張數(shù)據(jù)表，由一組相關(guān)的數(shù)據(jù)組成 。表中的每一列稱為一個字段，表中的第一行是字段名 稱。從表的第二行開始，每一行稱為一條記錄，每條記 錄含有相同類型和數(shù)量的字段。 計算機基礎(chǔ)教研室 數(shù)據(jù)庫管理系統(tǒng)（ DataBase Management System ，簡稱 DBMS）是位于用戶與操作系統(tǒng)之間的數(shù)據(jù)管理軟 件。 數(shù)據(jù)庫系統(tǒng)（ DataBase System，簡稱 DBS）是指 在計算機系統(tǒng)中引入數(shù)據(jù)庫后的系統(tǒng)。一個完整的數(shù)據(jù) 庫系統(tǒng)是由數(shù)據(jù)庫、數(shù)據(jù)庫管理系統(tǒng)、應(yīng)用系統(tǒng)、數(shù)據(jù) 庫管理員和用戶及硬件系統(tǒng)構(gòu)成。 計算機基礎(chǔ)教研室 1112 數(shù)據(jù)庫和表的建立 【 例 】 使用數(shù)據(jù)管理器建立一個學(xué)生管理數(shù)據(jù)庫 。 計算機基礎(chǔ)教研室 建立步驟如下： （ 1） 啟動數(shù)據(jù)管理器 。 選擇 【 外接程序 】 |【 可視化數(shù)據(jù)管理器 】 命令 ， 打開如圖所示的數(shù)據(jù)管理器窗口； 計算機基礎(chǔ)教研室 （ 2）建立數(shù)據(jù)庫。選擇數(shù)據(jù)管理器窗口中的 【 文件 】|【 新建 】 |【 Microsoft Access… 】 |【 Version MDB】 命令，在出現(xiàn)的保存數(shù)據(jù)庫對話框中，選擇好路徑、輸入數(shù)據(jù)庫文件名 ，打開如圖所示的窗口； 數(shù)據(jù)庫窗口 SQL語句 計算機基礎(chǔ)教研室 （ 3）建立數(shù)據(jù)表結(jié)構(gòu)。新建的數(shù)據(jù)庫 任何數(shù)據(jù)表的空庫，需在該庫中添加數(shù)據(jù)表。方法是在數(shù)據(jù)庫窗口中按鼠標(biāo)右鍵，在彈出的快捷菜單中選擇 “ 新建表 ” 后，打開圖所示的 “ 表結(jié)構(gòu) ” 對話框； 計算機基礎(chǔ)教研室 在 “ 表名稱 ” 框中輸入表名 “ 學(xué)生基本信息 ” 。單擊 “ 添加字段 ” 按鈕，打開如下圖所示的 “ 添加字段 ” 對話框，在此可以向 “ 學(xué)生基本信息 ” 表中添加字段。 計算機基礎(chǔ)教研室 “學(xué)生基本信息 ” 表結(jié)構(gòu) 字段名 字段類型 字段大小 字段名 字段類型 字段大小 學(xué)號 Text 6 出生日期 Date/Time 8（默認(rèn)） 姓名 Text 8 入學(xué)成績 Integer 2（默認(rèn)） 性別 Text 1 系別 Text 20 計算機基礎(chǔ)教研室 （ 4）編輯數(shù)據(jù)表中的數(shù)據(jù)。所建立的 “ 學(xué)生基本信息 ”表，是一個僅有表結(jié)構(gòu)的空表，還需向表中添加數(shù)據(jù)信息。方法是雙擊 “ 學(xué)生基本信息 ” 表，打開如下圖所示的編輯記錄窗口。 計算機基礎(chǔ)教研室 在 記錄操作對話框 中， 單擊“添加”按鈕出現(xiàn)如下圖所示的對話框，在其中依次輸入“學(xué)生基本信息”表中第 1條記錄的 6項字段值后，單擊“更新”按鈕，即完成一條記錄的添加操作，重復(fù)以上操作，將表中所包含的 8條記錄均添加到“學(xué)生基本信息”數(shù)據(jù)表中。 計算機基礎(chǔ)教研室 112 用 Data控件訪問數(shù)據(jù)庫 【 例 】 制作一個瀏覽信息的用戶界面。將 【 例】 所建立的數(shù)據(jù)庫中的記錄信息顯示在 6個文本框中，運行結(jié)果如圖所示。 計算機基礎(chǔ)教研室 【 解析 】 Data數(shù)據(jù)控件是 VB的標(biāo)準(zhǔn)控件 ， 利用它能方便地創(chuàng)建應(yīng)用程序與數(shù)據(jù)庫之間的連接 ， 并實現(xiàn)對數(shù)據(jù)資源的訪問 。 為了在程序運行時 ， 使 Data數(shù)據(jù)控件能夠訪問 student表中的記錄信息 ， 應(yīng)設(shè)置該 控件的DatabaseName屬性和 RecordSource屬性 。 ?DatabaseName屬性指定具體要訪問的數(shù)據(jù)庫文件名， 包括所有的路徑名 ， 實現(xiàn) Data數(shù)據(jù)控件與數(shù)據(jù)庫的連接 。 ?RecordSource屬性指定要訪問的數(shù)據(jù)庫中具體的數(shù)據(jù)表 ， 實現(xiàn) Data數(shù)據(jù)控件與數(shù)據(jù)表的連接 。 計算機基礎(chǔ)教研室 要在各文本框中顯示 Data控件所連接的數(shù)據(jù)表中的數(shù)據(jù)，必須將文本框與 Data數(shù)據(jù)控件進行綁定。其方法是： 單擊用于顯示 “ 學(xué)號 ” 信息的文本框 ， 在屬性窗口設(shè)置 DataSource屬性為 Data1（ 實現(xiàn)與數(shù)據(jù)控件Data1的綁定 ） ， 再設(shè)置 DataField屬性為 “ 學(xué)號 ” （即綁定到數(shù)據(jù)表中具體的字段上 ） 。 同理 ， 設(shè)置其他 5個文本框的 DataSource屬性均為 Data1， DataField屬性分別為姓名 、 性別 、 出生日期 、 入學(xué)成績和系別 。 注意： 需先設(shè)置 DataSource屬性 ， 后設(shè)置 DataField屬性 。 計算機基礎(chǔ)教研室 完成上述步驟后 ， 運行程序時 ， 在 6個文本框中將自動顯示 student表中的第一條記錄信息 。 Data數(shù)據(jù)控件上有 4個按鈕 ， 其中圖標(biāo) 、 、 、 分別表示移動到表中第一條記錄 、 最后一條記錄 、 前一條記錄 、 后一條記錄 。 通過這 4個按鈕 ， 可以瀏覽表中的不同記錄信息 。 計算機基礎(chǔ)教研室 編寫代碼 : Private Sub Form_Load() For i = 0 To 5 Text1(i).Locked = True ’設(shè)置文本框不可編輯 Next i End Sub Private Sub Data1_Reposition() = 第 amp。 _ + 1) amp。 條記錄 End Sub 計算機基礎(chǔ)教研室 說明： （ 1） 將文本框控件與 Data數(shù)據(jù)控件綁定后 ， 當(dāng)改變文本框中的數(shù)據(jù)時 ， 數(shù)據(jù)庫中相應(yīng)的數(shù)據(jù)會隨之改變 ， 為了控制用戶在文本框中編輯數(shù)據(jù) ， 在 Form_Load事件中將文本框的 Locked屬性設(shè)為 True； （ 2） 當(dāng)用戶單擊 Data控件上的某個按鈕 ， 進行記錄間的移動或在程序代碼中使用改變當(dāng)前記錄的屬性或方法 ， 使某條記錄成為當(dāng)前記錄后 ， 會觸發(fā) Data1的 Reposition事件 。 在該事件中出現(xiàn)的 Recordset是 Data1控件所控制的記錄集對象 ， 通過此對象對數(shù)據(jù)表中的記錄進行瀏覽和操作 。 訪問數(shù)據(jù)庫的記錄集可用 。 計算機基礎(chǔ)教研室 Recordset對象有多種屬性和方法，本例中用到的 AbsolutePosition屬性