【正文】 用程序 面向?qū)ο蟪绦蛟O(shè)計(jì)概述的引入 類 Visual Basic系統(tǒng)程序的面向?qū)ο蠹夹g(shù)，不僅實(shí)現(xiàn)了類的數(shù)據(jù)抽象，而且通過抽象出相關(guān)的類的共性，而形成一般的“ 基類 ” ，用戶可利用類的繼承性和封裝性，對 “ 基類 ” 增添不同的特性，或完全繼承派生出各種各樣的對象，完成程序設(shè)計(jì)的任務(wù)。 第 3章 程序設(shè)計(jì)基礎(chǔ) 數(shù)據(jù)類型 自定義數(shù)據(jù)類型 定義自定義數(shù)據(jù)類型語句格式如下： Type 數(shù)據(jù)類型名 數(shù)據(jù)元素名 [([下標(biāo) ])] As 類型名 數(shù)據(jù)元素名 [([下標(biāo) ])] As 類型名 ………… End Type 第 3章 程序設(shè)計(jì)基礎(chǔ) 數(shù)據(jù)類型 自定義數(shù)據(jù)類型 例如 : 用于表示學(xué)生自然情況如學(xué)號、姓名、性別、出生日期、身高等數(shù)據(jù)，可定義成如下結(jié)構(gòu)： Type Student Number As String*8 Name As String*3 Sex As String*1 Day As Date Stature As Single End Type 第 3章 程序設(shè)計(jì)基礎(chǔ) 數(shù)據(jù)存儲 常量 ，數(shù)據(jù)類型的不同決定了常量的表現(xiàn)也不同。 在窗體模塊的聲明部分、標(biāo)準(zhǔn)模塊的聲明部分用 Public語句聲明的變量叫全局變量。 例如： Tab(10)。 （ 2） Cls方法：清除在窗體顯示的文本或圖形。 第 4章 窗體及相關(guān)操作 幾個基本內(nèi)部控件 文本框控件 SetFocus方法： SetFocus方法格式如下： [對象名 .]SetFocus 功能：把光標(biāo)移到 [對象名 .]指定的文本框上。 第 4章 窗體及相關(guān)操作 幾個基本內(nèi)部控件 時鐘控件 例 410 創(chuàng)建一個 “ 電子時鐘 ” 窗體，通過 Command控件進(jìn)行時間和日期的切換，程序運(yùn)行結(jié)果如圖所示。 GoTo語句的格式如下： GoTo 標(biāo)號 功能：當(dāng)程序執(zhí)行該語句時，無條件地將程序轉(zhuǎn)移到 標(biāo)號 所標(biāo)識的語句行上，并從該行向下執(zhí)行。 演示程序 第 5章 程序基本控制結(jié)構(gòu) 循環(huán)結(jié)構(gòu)語句 Do 語句 例 517 設(shè)計(jì)一個窗體，輸出 30個數(shù)的數(shù)列（ 1， 2，3， 5， 8， ………… ），程序運(yùn)行結(jié)果如圖所示。 （ 3）數(shù)組每一維的元素個數(shù)，也就是數(shù)組每一維的大小是（上界－下界 +1），而整個數(shù)組的元素個數(shù)，是每一維元素個數(shù)的乘積。 （ 4）按數(shù)組的功能可分為變量數(shù)組、控件數(shù)組。 演示程序 第 5章 程序基本控制結(jié)構(gòu) 循環(huán)結(jié)構(gòu)語句 While 語句 例 514 設(shè)計(jì)一個窗體，求自然對數(shù) e的值（ e=1+1/1!+1/2! +1/3! +…… +1/n! 其中 n的取值應(yīng)保證 1/n!1E5） ，程序運(yùn)行結(jié)果如圖所示。 多路分支的語句格式如下 ： Select Case 測試表達(dá)式 Case 表達(dá)式值列表 1 語句序列 1 Case 表達(dá)式值列表 2 語句序列 2 …… …… Case 表達(dá)式值列表 n 語句序列 n [Case Else 語句序列 n+1] End Select 第 5章 程序基本控制結(jié)構(gòu) Select Case 語句 功能：該語句執(zhí)行時 ， 根據(jù) 測試表達(dá)式 ， 從上到下依次檢查 n個 表達(dá)式值列表 ， 如果有一個與測試表達(dá)式 的值相匹配 ， 選擇 n+1個 語句序列 中對應(yīng)的一個執(zhí)行 ， 當(dāng)所有 Case中的 表達(dá)式值列表 中沒有與 測試表達(dá)式 的值相匹配時 ， 如果有 Case Else項(xiàng) ， 則執(zhí)行 語句序列 n+1， 再執(zhí)行 End Select后面的下一條語句；否則 ， 直接執(zhí)行 End Select后面的下一條語句 。當(dāng)按標(biāo)準(zhǔn)按鈕時，打開一個對話框；當(dāng)按隱藏按鈕時，隱藏按鈕被隱藏；當(dāng)按浮動按鈕時，浮動按鈕被移走；當(dāng)按跳動按鈕時，怎么也抓不到按鈕，當(dāng)按STOP按鈕時，停止程序的運(yùn)行；程序運(yùn)行結(jié)果如圖所示。 （ 1）名稱（ Name） （ 2） top、 left （ 3） Height、 Width （ 4） Caption （ 5） BackStyle （ 6） AutoSize （ 7） Alignment屬性 第 4章 窗體及相關(guān)操作 幾個基本內(nèi)部控件 標(biāo)簽控件 （ 8） WordWrap （ 9） BorderStyle （ 10） BackColor （ 11） Font屬性組 設(shè)置在標(biāo)簽的 Caption內(nèi)容顯示效果屬性，包括 FontName、 FontSize 、 FontBold 、FontItalic 、 FontStrikeThru 。 在 Visual Basic應(yīng)用程序中，可以有多個標(biāo)準(zhǔn)模塊，而且 “ Sub Main”過程必須寫在標(biāo)準(zhǔn)模塊中。 注意事項(xiàng)： （ 1） [對象名 .] 可以是窗體名（ Form）、圖片框名（ PictureBox），在立即窗口可省略了 [對象名 .]或?qū)憽?Debug”，在窗體中，若省略對象，則表示在當(dāng)前窗體上輸出。 在標(biāo)準(zhǔn)模塊的聲明部分用 Dim和 Private語句聲明的變量叫模塊變量。 （ Boolean）數(shù)據(jù)是描述客觀事物真假的數(shù)據(jù)，用于表示邏輯判斷結(jié)果，它只有真（ True）和假（ False）兩個值。 開始使用 VB編程 第 2章 建立一個應(yīng)用程序 面向?qū)ο蟪绦蛟O(shè)計(jì)概述的引入 對象 對象就是現(xiàn)實(shí)世界中某個客觀存在的事物，是對客觀事物屬性及行為特征的描述。 第 1章 緒 論 Visual Basic 集成開發(fā)環(huán)境 工程設(shè)計(jì)窗口 工程資源管理器窗口如圖所示： 第 1章 緒 論 Visual Basic 集成開發(fā)環(huán)境 工程設(shè)計(jì)窗口 (Form)設(shè)計(jì)器窗口 窗體設(shè)計(jì)器窗口是設(shè)計(jì) Visual BASIC程序界面的工作窗口，構(gòu)成程序的基本 “ 控件 ” 都是通過窗體設(shè)計(jì)器設(shè)計(jì)而成的。 (1)硬件環(huán)境： 486DX/66 MHz 或更高的處理器， CDROM 驅(qū)動器，VGA 或分辨率更高的監(jiān)視器， 16MB 以上的內(nèi)存 (2)軟件環(huán)境： Windows 95 或更高版本，或 Windows NT ，或更高版本操作系統(tǒng)軟件。 第 1章 緒 論 Visual Basic 安裝與啟動 啟動與退出 退出 VB可采用以下 4種方式 （ 1）在 VB系統(tǒng)環(huán)境下，依次選擇 【 文件 】 → 【 退出 】菜單選項(xiàng)。窗體布局窗口如圖所示： 第 1章 緒 論 Visual Basic 集成開發(fā)環(huán)境 工程設(shè)計(jì)窗口 (Immediate)窗口 立即窗口是用來進(jìn)行快速的表達(dá)式計(jì)算，簡單方法的操作，進(jìn)行程序測試的工作窗口。 第 2章 建立一個應(yīng)用程序 面向?qū)ο蟪绦蛟O(shè)計(jì)概述的引入 類 內(nèi)部控件 ActiveX控件 第 2章 建立一個應(yīng)用程序 面向?qū)ο蟪绦蛟O(shè)計(jì)概述的引入 類 第 2章 建立一個應(yīng)用程序 面向?qū)ο蟪绦蛟O(shè)計(jì)概述的引入 屬性的設(shè)置 屬性（ Attribute）是對象的物理性質(zhì)，是用來描述和反映對象特征的參數(shù)，一個對象的諸多屬性所包含的信息，反映了這個對象的狀態(tài)，屬性不僅決定了對象的外觀，有時也決定了對象的行為。 ，其類型取決于 表達(dá)式 值的類型。 第 3章 程序設(shè)計(jì)基礎(chǔ) 數(shù)據(jù)存儲 變量 與 Static的區(qū)別 Dim定義的局部變量稱為自動變量。 Exp(5) 第 4章 窗體及相關(guān)操作 輸入輸出操作 Print方法 （ 2） Spc()函數(shù) Spc()函數(shù)格式如下： Spc(N) 功能：光標(biāo)移到 N個空格之后的位置。 （ 3） Move方法：移動窗體并可改變其大小。 第 4章 窗體及相關(guān)操作 幾個基本內(nèi)部控件 文本框控件 （ 1） Change ：改變文本框的 Text屬性時觸發(fā)的事件。 演示程序 第 4章 窗體及相關(guān)操作 幾個基本內(nèi)部控件 形狀控件 形狀（ Shape）用于美化窗體、框架或圖片框的顯示效果，用 Shape控件可繪畫矩形、正方形、橢圓形、圓形、圓角矩形或圓角正方形等圖形 。 第 5章 程序基本控制結(jié)構(gòu) IIF函數(shù) IIF函數(shù)可用來控制簡單的分支操作，它是 If…… Then…… Else語句結(jié)構(gòu)的另一種形式。 演示程序 Visual Basic 程序設(shè)計(jì) 李雁翎 清華大學(xué)出版社 數(shù)組 第 6章 本章要點(diǎn) 數(shù)組概述 數(shù)組聲明 與數(shù)組相關(guān)的操作函數(shù) 應(yīng)用實(shí)例 控件數(shù)組 第 6章 數(shù)組 數(shù)組不是一種數(shù)據(jù)類型，而是一組有序基本類型變量的集合，數(shù)組的使用方法與內(nèi)存變量相同，但功能遠(yuǎn)遠(yuǎn)超過內(nèi)存變量。 （ 4）缺省 下標(biāo)的下界 ，數(shù)組每一維的下標(biāo)從 0開始，若希望下標(biāo)從 1開始，可在模塊的通用部分使用 Option Base語句設(shè)置開始下標(biāo)為 1（ Option Base 1）。 數(shù)值型數(shù)組：數(shù)組元素是 Integer、 long、 single等類型變量的集合； 字符串?dāng)?shù)組：數(shù)組元素是 string類型變量的集合； 日期型數(shù)組：數(shù)組元素是 date類型變量的集合； 變體型數(shù)組：數(shù)組元素是 Variant類型變量的集合； 自定義型數(shù)組：數(shù)組元素是自定義類型變量的集合。 第 5章 程序基本控制結(jié)構(gòu) 循環(huán)結(jié)構(gòu)語句 While 語句 While語句的流程： T 循環(huán)體 F 條件 第 5章 程序基本控制結(jié)構(gòu) 循環(huán)結(jié)構(gòu)語句 While 語句 例 513 設(shè)計(jì)一個窗體，輸入任意數(shù) N，求 P的值（ P=N!），程序運(yùn)行結(jié)果如圖所示。 第 5章 程序基本控制結(jié)構(gòu) 分支結(jié)構(gòu)語句 IF語句 例 56 演示程序 第 5章 程序基本控制結(jié)構(gòu) Select Case 語句 Select case語句又稱多路分支語句，它是根據(jù)多個表達(dá)式列表的值，選擇多個操作中的一個對應(yīng)執(zhí)行。 第 4章 窗體及相關(guān)操作 幾個基本內(nèi)部控件 命令按鈕控件 例 48 創(chuàng)建一個窗體，對不同的 Command進(jìn)行操作，完成不同的功能。 窗體 第 4章 窗體及相關(guān)操作 幾個基本內(nèi)部控件 標(biāo)簽控件 標(biāo)簽（ Label）是用于顯示文本信息的控件。 注意事項(xiàng)： （ 1） 提示 和 [， 標(biāo)題 ])與 InputBox函數(shù)中對應(yīng)的參數(shù)相同； （ 2） 按鈕類型 ：是由 [按鈕數(shù)目 ]+[圖標(biāo)類型 ]+[默認(rèn)按鈕 ]+[按鈕模式 ]組成； 第 4章 窗體及相關(guān)操作 輸入輸出操作 輸出消息框 已知： MsgBox 確實(shí)要刪除嗎？請選擇！ 執(zhí)行該語句后屏幕出現(xiàn)一個對話窗口，如下圖所示： 第 4章 窗體及相關(guān)操作 輸入輸出操作 輸出消息框 已知： MsgBox “確實(shí)要刪除嗎？請選擇！ ” , 64 + 1, “提示 ” 執(zhí)行該語句后屏幕出現(xiàn)一個對話窗口，如下圖所示： 第 4章 窗體及相關(guān)操作 輸入輸出操作 輸出消息框 已知： Msg1 = MsgBox(“確實(shí)要刪除嗎？請選擇！ ” , 48, “提示 ” )執(zhí)行該語句后屏幕出現(xiàn)一個對話窗口， 如下圖所示： 第 4章 窗體及相關(guān)操作 輸入輸出操作 輸出消息框 已知： Msg1 = MsgBox(“確實(shí)要刪除嗎？請選擇！ ” , 50, “提示 ” ) 執(zhí)行該語句后屏幕出現(xiàn)一個對話窗口，如下圖所示