簡(jiǎn)單的程序設(shè)計(jì)

簡(jiǎn)單的程序設(shè)計(jì)演示文稿現(xiàn)在是1頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（優(yōu)選）簡(jiǎn)單的程序設(shè)計(jì)現(xiàn)在是2頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24一、初期的程序設(shè)計(jì)缺點(diǎn)：早期的計(jì)算機(jī)價(jià)格昂貴、內(nèi)存很小、速度不高。為了節(jié)省昂貴的CPU機(jī)時(shí)費(fèi)，不得不使用巧妙的手段和技術(shù)，手工編寫各種高效的程序。隨著計(jì)算機(jī)性能價(jià)格比不斷提高，計(jì)算機(jī)應(yīng)用越來(lái)越廣泛，程序規(guī)模越來(lái)越大，手工方式編程的缺陷已成為阻礙計(jì)算機(jī)技術(shù)發(fā)展的主要障礙。硬件的進(jìn)一步發(fā)展，產(chǎn)生了軟件危機(jī)?，F(xiàn)在是3頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24二、結(jié)構(gòu)化程序設(shè)計(jì)1.結(jié)構(gòu)化程序設(shè)計(jì)方法的提出：

70年代由Dijkstra提出(可讀性、可維護(hù)性)2.結(jié)構(gòu)化程序設(shè)計(jì)采用的方法(1)采用自頂向下、逐步求精的分析和設(shè)計(jì)方法，即功能分解法（模塊化）(2)三種結(jié)構(gòu)：順序、選擇和循環(huán)現(xiàn)在是4頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24采用了“數(shù)據(jù)結(jié)構(gòu)+算法”的程序設(shè)計(jì)模式

(1)即面向過(guò)程的程序設(shè)計(jì)方法,它與人的思維不協(xié)調(diào),不能真實(shí)反映現(xiàn)實(shí)世界。

(2)它突出實(shí)現(xiàn)功能的過(guò)程方法,但易出錯(cuò)、程序難以維護(hù).3.結(jié)構(gòu)化程序設(shè)計(jì)方法的缺點(diǎn)：現(xiàn)在是5頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24面向?qū)ο蟮某绦蛟O(shè)計(jì)與傳統(tǒng)的面向過(guò)程的程序設(shè)計(jì)方法的區(qū)別:過(guò)程（Howtodo?）與對(duì)象（Whattodo?）三、面向?qū)ο蟮某绦蛟O(shè)計(jì)現(xiàn)在是6頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24舉例：一輛汽車是一個(gè)動(dòng)作主體，汽車又由發(fā)動(dòng)機(jī)、傳動(dòng)裝置、剎車系統(tǒng)、車輪等部分組合而成。如果我們?cè)谑褂糜?jì)算機(jī)程序描述一輛汽車的動(dòng)作的時(shí)候，著眼點(diǎn)是汽車從一地到另一地的運(yùn)動(dòng)過(guò)程，則為傳統(tǒng)的“面向過(guò)程的程序設(shè)計(jì)思想”；現(xiàn)在是7頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24如果著眼點(diǎn)在組成汽車的一個(gè)個(gè)部件，即動(dòng)作體的特性、工作規(guī)律和動(dòng)作方式，通過(guò)對(duì)這些動(dòng)作體的描述，即確定整個(gè)汽車的工作特性和規(guī)律，這就是“面向?qū)ο蟮某绦蛟O(shè)計(jì)思想”，該種設(shè)計(jì)方法對(duì)現(xiàn)實(shí)世界的反映更加具體和精確?，F(xiàn)在是8頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（1）它于80年代提出,起源于Smalltalk語(yǔ)言（2）面向?qū)ο蟪绦蛟O(shè)計(jì)方法不是將問(wèn)題分解為過(guò)程,而是將問(wèn)題分解為對(duì)象。（3）它代表了一種全新的設(shè)計(jì)思路和新的處理問(wèn)題角度。面向?qū)ο螅阂詫?duì)象為中心來(lái)分析和解決問(wèn)題程序設(shè)計(jì)中的對(duì)象：指將數(shù)據(jù)和操作數(shù)據(jù)的方法封裝起來(lái)的一種實(shí)體一）面向?qū)ο蟮某绦蛟O(shè)計(jì)方法的提出：現(xiàn)在是9頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24二）面向?qū)ο蟪绦蛟O(shè)計(jì)的優(yōu)點(diǎn):

“對(duì)象+消息”的程序設(shè)計(jì)模式對(duì)象之間的相互作用通過(guò)消息實(shí)現(xiàn)

1.符合思維習(xí)慣

2.可重復(fù)使用

3.具有可擴(kuò)展性

4.可管理性

5.可視化技術(shù),改善了工作界面現(xiàn)在是10頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.2VB中對(duì)象及其屬性、事件和方法一、VB中的對(duì)象及其分類二、對(duì)象的屬性、事件和方法現(xiàn)在是11頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24一、對(duì)象和類的概念對(duì)象是指在現(xiàn)實(shí)世界中可以獨(dú)立存在的、可以被區(qū)分的一些實(shí)體，也可以是一些概念上的實(shí)體。

舉例說(shuō)明：書，筆，手機(jī)，飛機(jī)等現(xiàn)在是12頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

類是所有具有一定共性的對(duì)象的集合，即類是同種對(duì)象的抽象，而對(duì)象是類的一次實(shí)例化結(jié)果。

舉例說(shuō)明類的涵義（見(jiàn)下圖）現(xiàn)在是13頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24例1.舉例說(shuō)明類和對(duì)象的關(guān)系:鞋皮鞋綠皮鞋白布鞋黑一個(gè)類三個(gè)對(duì)象現(xiàn)在是14頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24這是一個(gè)類不專指特定的事物

汽車一輛白色小汽車舉例2如下：

這是一個(gè)對(duì)象，因?yàn)樗侵敢惠v具體的汽車實(shí)體，該對(duì)象的屬性為白色、小型等再回首類的概念現(xiàn)在是15頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（一）VB中的類現(xiàn)在是16頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（二）VB中的對(duì)象

定義:

VB中的對(duì)象是指具有特殊屬性和行為方法的實(shí)體。如：窗體對(duì)象、命令按鈕等在VB中大多數(shù)對(duì)象是由系統(tǒng)設(shè)計(jì)好的，直接供用戶使用?，F(xiàn)在是17頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（三）VB中的對(duì)象類型

VB中的對(duì)象多數(shù)已由系統(tǒng)設(shè)計(jì)好，常用的對(duì)象如下：

1.窗體對(duì)象

最基本的對(duì)象，用于創(chuàng)建程序的界面，在窗體上可放置不同的控件對(duì)象。舉實(shí)例說(shuō)明現(xiàn)在是18頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.控件對(duì)象工具箱中的各種控件工具圖標(biāo)，實(shí)際上就是代表了各個(gè)不同對(duì)象的類。當(dāng)在窗體上畫一個(gè)控件，并設(shè)置其屬性后，就創(chuàng)建了一個(gè)控件對(duì)象。

VB中最基本的控件對(duì)象有標(biāo)簽、文本框等20個(gè).

舉例說(shuō)明?，F(xiàn)在是19頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

構(gòu)成了對(duì)象的三要素

①屬性是指一個(gè)對(duì)象的特征（性質(zhì)）②事件是指作用在對(duì)象上、且能夠?yàn)閷?duì)象所識(shí)別和響應(yīng)的一系列動(dòng)作。如鼠標(biāo)的單擊等.③方法是指對(duì)象所發(fā)出的動(dòng)作舉例說(shuō)明二、對(duì)象的屬性、事件和方法現(xiàn)在是20頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24方法:爆炸事件：針刺屬性：黃色充滿氫氣對(duì)象、屬性、事件和方法的含義。例3：用針刺一只黃色充滿氫氣的氣球，氣球發(fā)生爆炸。對(duì)象:氣球現(xiàn)在是21頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

（一）屬性(Properties)1.屬性的概念屬性是用來(lái)描述和反映對(duì)象特征的參數(shù).

2.屬性和屬性值的區(qū)別及屬性的共有性和私有性

(舉例說(shuō)明：在屬性窗口中進(jìn)行查看和設(shè)置)現(xiàn)在是22頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/243.設(shè)置對(duì)象屬性值的兩種方法：

1）在設(shè)計(jì)階段利用屬性窗口直接設(shè)置屬性

2）在程序代碼中通過(guò)賦值設(shè)置屬性，語(yǔ)法格式為：

[對(duì)象名.]屬性名

例

Form1.Caption=“輸入”

Text1.Left=100

說(shuō)明：P21現(xiàn)在是23頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（二）事件(Event)及事件過(guò)程

1.事件的概念事件是指作用在某對(duì)象上、由VB預(yù)先設(shè)置好的、能夠?yàn)槟硨?duì)象所識(shí)別和響應(yīng)的一系列動(dòng)作。舉例說(shuō)明如鼠標(biāo)的單擊(Click)進(jìn)入

現(xiàn)在是24頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24又例如：

鼠標(biāo)移動(dòng)(MouseMove)、鍵盤按下(KeyPress)等.

每個(gè)對(duì)象都可識(shí)別一系列事件。如：窗體對(duì)象可識(shí)別單擊(Click)

、雙擊(Dblclick)等

現(xiàn)在是25頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.有關(guān)說(shuō)明

1)鼠標(biāo)的單擊(Click)、雙擊(DblClick)、按下按鍵(MouseDown)、松開(kāi)按鍵(MouseUp)、鼠標(biāo)移動(dòng)(MouseMove)等都是VB中常用的事件。

2)事件可以由用戶觸發(fā)，也可由系統(tǒng)觸發(fā)?，F(xiàn)在是26頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/243.事件過(guò)程的概念它是用來(lái)說(shuō)明該事件發(fā)生后所要做的事情,它是由編程人員來(lái)完成的代碼設(shè)計(jì)。

當(dāng)事件發(fā)生時(shí)，VB就立即尋找相應(yīng)的程序進(jìn)行處理，那么，響應(yīng)一個(gè)事件的程序代碼就稱為對(duì)象的事件過(guò)程?，F(xiàn)在是27頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

Sub對(duì)象名_事件名（[參數(shù)列表]）

……(事件過(guò)程代碼)EndSub事件過(guò)程名事件過(guò)程的形式：說(shuō)明：事件過(guò)程名由對(duì)象名、下劃線和事件名組成定義過(guò)程開(kāi)始語(yǔ)句定義過(guò)程結(jié)束語(yǔ)句現(xiàn)在是28頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24舉例4：

PrivateSub女生—蟑螂爬過(guò)去（）高聲尖叫的程序代碼EndSub

PrivateSub男生—蟑螂爬過(guò)去（）高聲喊打的程序代碼EndSub

現(xiàn)在是29頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24例5舉實(shí)例說(shuō)明事件過(guò)程及程序代碼應(yīng)寫在何處應(yīng)用程序窗體（界面）代碼窗口見(jiàn)事件過(guò)程實(shí)例現(xiàn)在是30頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24認(rèn)識(shí)與提高：當(dāng)在VB的設(shè)計(jì)環(huán)境中建立對(duì)象后，若希望某個(gè)對(duì)象在收到某個(gè)事件后能做出預(yù)期的反應(yīng)。此時(shí)，只要在該對(duì)象的某一特定事件過(guò)程中編寫相應(yīng)的程序代碼即可。事件過(guò)程代碼是由一系列語(yǔ)句行組成的現(xiàn)在是31頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（三）方法(Method)1.方法的概念方法指的是控制對(duì)象動(dòng)作行為的方式。從對(duì)象本身的角度，可通俗地理解為對(duì)象的動(dòng)作。

（舉以下實(shí)例說(shuō)明）現(xiàn)在是32頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24舉例6.說(shuō)明對(duì)象的屬性、事件和方法三者之間的關(guān)系。屬性：紅色事件：箭刺方法:放氣現(xiàn)在是33頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

2.

對(duì)象方法的調(diào)用格式：

[對(duì)象名.]方法名[參數(shù)列表]

例:

方法PrintForm1.Print“歡迎使用VB”

或Print“歡迎使用VB”

注意：省略對(duì)象時(shí)表示在當(dāng)前對(duì)象,一般指當(dāng)前窗體演示例2-1現(xiàn)在是34頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

在開(kāi)發(fā)應(yīng)用程序時(shí)，對(duì)象、屬性、事件和方法的作用體現(xiàn)在何處？1.對(duì)象：它是面向?qū)ο蟪绦蛟O(shè)計(jì)的核心，體現(xiàn)在界面設(shè)計(jì)中。2.屬性：是用來(lái)描述對(duì)象的特征的數(shù)據(jù)思考與提高：現(xiàn)在是35頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/243.事件：事件是程序代碼執(zhí)行的導(dǎo)火索，即如果用戶或系統(tǒng)不觸發(fā)對(duì)象的事件，程序代碼就不可能執(zhí)行引入“事件驅(qū)動(dòng)”的概念

事件驅(qū)動(dòng)是指程序的執(zhí)行是靠事件的發(fā)生引起的。簡(jiǎn)言之，只有事件的發(fā)生，才能引起程序代碼的執(zhí)行。舉例說(shuō)明：現(xiàn)在是36頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/244.事件過(guò)程是指事件發(fā)生后，響應(yīng)一個(gè)事件的程序代碼。事件一發(fā)生，系統(tǒng)就去執(zhí)行程序代碼如若希望事件a作用在對(duì)象甲上時(shí)，執(zhí)行程序代碼。則必須在事件過(guò)程()中編寫程序代碼5.總結(jié)：如何確定在事件過(guò)程中編寫程序代碼的位置對(duì)象甲_事件a()現(xiàn)在是37頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.3簡(jiǎn)單應(yīng)用程序的建立一、用VB開(kāi)發(fā)應(yīng)用程序，包括兩部分工作：

一）完成程序界面的設(shè)計(jì)(外觀上)

二）完成程序代碼的設(shè)計(jì)

現(xiàn)在是38頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24建立應(yīng)用程序的步驟:

1.設(shè)立程序的用戶界面

2.設(shè)置對(duì)象的屬性

3.編寫對(duì)象事件過(guò)程的程序代碼

4.保存工程

5.調(diào)試和運(yùn)行

6.創(chuàng)建可執(zhí)行程序（也可以不用）現(xiàn)在是39頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24步驟1、設(shè)計(jì)程序的用戶界面（一）建立一個(gè)新的工程文件和空白窗體

1.“文件”+“新建工程”+“標(biāo)準(zhǔn).exe”2.在窗體上添加控件對(duì)象步驟如下：

1）在工具箱中控件對(duì)象對(duì)應(yīng)的圖標(biāo)上，左鍵單擊選擇，并在窗體上拖曳至合適大小;2）或者在工具箱中雙擊所需的圖標(biāo)

舉實(shí)例演示現(xiàn)在是40頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（二）控件的基本操作（與界面設(shè)計(jì)相關(guān)）

1.激活控件舉實(shí)例演示

2.調(diào)整控件框的大小

3.刪除控件

4.復(fù)制控件

5.同時(shí)操作多個(gè)控件（1）按住Shift或Ctrl，并單擊要選的控件（2）按住鼠標(biāo)左鍵并拖動(dòng)，將要選的控件框起來(lái)（3）使用“格式”菜單命令現(xiàn)在是41頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24步驟2、設(shè)置控件對(duì)象的屬性設(shè)置屬性的目的：使控件對(duì)象符合應(yīng)用程序的需要，屬性是控件對(duì)象特征的表示，不同控件對(duì)象有不同的屬性。設(shè)置屬性的方法有兩種（簡(jiǎn)講）：

1)在設(shè)計(jì)階段利用屬性窗口直接設(shè)置屬性

2)通過(guò)程序代碼，在運(yùn)行時(shí)改變其屬性現(xiàn)在是42頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24在設(shè)計(jì)階段進(jìn)行屬性設(shè)置的方法和步驟：

1.選中控件對(duì)象（單擊），則會(huì)出現(xiàn)該控件的屬性窗口

2.在該窗口中選中要修改的屬性，在屬性窗口輸入或選擇所需的屬性值

現(xiàn)在是43頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24特別提醒易出錯(cuò)的屬性：對(duì)象的名稱屬性（1）命名：每個(gè)對(duì)象都有自己的名字，有了名字才能在程序代碼中引用該對(duì)象，在屬性窗口“名稱”設(shè)置對(duì)象名稱。（2）命名格式：名字以字母或漢字開(kāi)頭，由字母、漢字、數(shù)字串、下劃線組成，長(zhǎng)度<=40個(gè)字符.練習(xí)P598

（3）系統(tǒng)的默認(rèn)名：如：Form1，Label1,Command1...現(xiàn)在是44頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24步驟3、事件過(guò)程的代碼設(shè)計(jì)

使用三種方法進(jìn)入代碼設(shè)計(jì)窗口：

1.雙擊窗體或控件對(duì)象

2.在工程資源管理器窗口選擇“查看代碼”

3.視圖菜單選擇“代碼窗口”如何返回對(duì)象窗口？現(xiàn)在是45頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24在代碼窗口中對(duì)事件過(guò)程編程的步驟：如若希望事件a作用在對(duì)象甲上時(shí)執(zhí)行程序代碼,則

(1)單擊“對(duì)象列表框”右邊的箭頭，選擇需進(jìn)行事件過(guò)程編程的對(duì)象甲。

(2)單擊“過(guò)程列表框”右邊的箭頭，選擇與所選對(duì)象甲對(duì)應(yīng)的事件a

。

(3)在所選事件過(guò)程代碼模板中編寫程序代碼。如下所示現(xiàn)在是46頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24對(duì)象列表框事件名列表框事件過(guò)程模板現(xiàn)在是47頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24現(xiàn)場(chǎng)舉example1例演示編程

界面和事件過(guò)程代碼為：'“確定”命令按鈕的單擊事件過(guò)程PrivateSubCommand1_Click()Text1.Text="歡迎學(xué)習(xí)VisualBasic!"EndSub現(xiàn)在是48頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24特別提醒關(guān)于事件過(guò)程名的命名P22一、對(duì)于控件來(lái)說(shuō)，事件過(guò)程名是由對(duì)象名、下劃線和事件名三部分組成。而對(duì)于窗體來(lái)說(shuō)，事件過(guò)程名由Form、下劃線和事件名組成二、舉例1、某命令按鈕的名稱屬性為cmddisp，標(biāo)題為command1，則它的click事件過(guò)程名為：

A、cmddisp_click()B、command1_click()

舉例2、窗體的名稱屬性為fm，則它的click事件過(guò)程名為：

A、Fm_click()B、Form1_click()C、Form_click()現(xiàn)在是49頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24步驟4、文件的保存若用戶要保存的是一個(gè)新建的工程：“文件”＋“保存工程”或單擊工具欄的“保存”按鈕注意：文件保存的類型

現(xiàn)在是50頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24步驟5、程序的運(yùn)行、調(diào)試

ＶＢ提供了兩種程序運(yùn)行模式：編譯運(yùn)行模式解釋運(yùn)行模式現(xiàn)在是51頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24一、編譯運(yùn)行模式過(guò)程ＶＢ編譯程序機(jī)器指令目標(biāo)程序ＶＢ應(yīng)用程序源程序執(zhí)行計(jì)算結(jié)果編譯程序的兩個(gè)功能：翻譯和查錯(cuò)現(xiàn)在是52頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24二、解釋運(yùn)行模式過(guò)程

1.

ＶＢ解釋程序計(jì)算結(jié)果ＶＢ應(yīng)用程序源程序解釋、執(zhí)行現(xiàn)在是53頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24（1）選擇“運(yùn)行”＋“啟動(dòng)”，或按F5或單擊運(yùn)行按鈕（2）顯示窗體窗口或出現(xiàn)中斷（Ctrl+Break）

||

（3）結(jié)束，單擊結(jié)束按鈕■２.解釋運(yùn)行模式操作步驟:現(xiàn)在是54頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24步驟6、創(chuàng)建可執(zhí)行程序?qū)?yīng)用程序編譯成可執(zhí)行程序后，用戶可以在Ｗindows環(huán)境下直接執(zhí)行。生成可執(zhí)行程序的步驟為：

1.“文件”＋“生成＊.exe”

2.選擇保存位置以及文件名，再單擊“確定”按鈕舉example1例現(xiàn)在是55頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24現(xiàn)場(chǎng)演示P29例2-2

本題涉及的控件對(duì)象:界面要求如下：

1個(gè)文本框（用于顯示信息）

2個(gè)命令按鈕

此例的控件對(duì)象屬性設(shè)置見(jiàn)P31表2-1現(xiàn)在是56頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24現(xiàn)場(chǎng)演示編程

（三個(gè)事件過(guò)程）事件過(guò)程代碼為：'“確定”命令按鈕的單擊事件過(guò)程PrivateSubcmdDisp_Click()txtDisp.Text="歡迎學(xué)習(xí)VisualBasic!"

‘給txtDisp文本框的Text屬性賦值EndSub現(xiàn)在是57頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24'“退出”命令按鈕的單擊事件過(guò)程PrivateSubcmdEnd_Click()End'程序結(jié)束EndSub'窗體的裝載事件過(guò)程PrivateSubForm_Load()txtDisp.Text="第一個(gè)VB應(yīng)用程序"EndSub現(xiàn)在是58頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.4窗體和基本控件2.4.1基本屬性1.名稱(Name)對(duì)象名在此設(shè)置

.是所有對(duì)象都具有的屬性

.在設(shè)計(jì)時(shí),系統(tǒng)會(huì)給出默認(rèn)名字,如命令按鈕

command1,…,用戶可修改

.對(duì)象名稱不顯示在窗體上

.在運(yùn)行過(guò)程中不可再改變

控件是可視化編程的基礎(chǔ)。窗體和控件的屬性影響他們的外觀和性能?，F(xiàn)在是59頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

2.標(biāo)題(Caption)

用于設(shè)置窗體或控件的標(biāo)題（少數(shù)控件沒(méi)有此屬性）如:命令按鈕上的文字標(biāo)題(Caption)現(xiàn)在是60頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24TopLeftWidthHeight

3.高度(Height)寬度(Width)

距頂部(Top)距左邊(Left)

屬性用于確定控件的位置。單位:twip1twip=1/20點(diǎn)=1/1440英寸=1/567cm現(xiàn)在是61頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

4.Enabled屬性

確定是否允許對(duì)控件的操作

True:允許False:不允許

5.Visible屬性

控件運(yùn)行時(shí)是否可見(jiàn)

True:可見(jiàn)False:不可見(jiàn)

注意：可見(jiàn)的對(duì)象不一定可操作，不可見(jiàn)的對(duì)象一定不能操作。

現(xiàn)在是62頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

6.Font系列屬性用于設(shè)置字體，文本的外觀。包括字體、字型、字號(hào)和下劃線等

FontName

正文字體(字符型)

FontSize

大小(整型)

FontBold

是否粗體(邏輯型)

FontItalic

是否斜體(邏輯型)

FontStrikethru

是否加刪除線

FontUnderline

是否加下劃線說(shuō)明:若要對(duì)窗體中的所有控件設(shè)置相同F(xiàn)ont屬性,可先對(duì)窗體設(shè)置.現(xiàn)在是63頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/247.ForeColor前景色，顯示正文的顏色

BackColor背景色8.BackStyle背景風(fēng)格

0——

透明顯示，看不到背景色

1——不透明顯示 9.BorderStyle邊框風(fēng)格

0——沒(méi)有邊框

1——有單邊框 現(xiàn)在是64頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

10.Alignment對(duì)齊方式

0——LeftJustify正文左對(duì)齊

1——RightJustify右對(duì)齊

2——Center居中

11.AutoSize自動(dòng)調(diào)整尺寸

True：自動(dòng)調(diào)整

False

：保持原來(lái)大小

12.WordWrap文字縮放（當(dāng)AutoSize為True時(shí)才有效）

True:

垂直方向發(fā)生變化,水平方向不變

False:水平方向發(fā)生變化,垂直方向不變現(xiàn)在是65頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

13.TabIndex和TabStopTabIndex屬性：決定按動(dòng)Tab鍵時(shí),焦點(diǎn)移動(dòng)的順序(0,1,2,3…)

TabStop屬性：決定焦點(diǎn)是否能停在控件上

True:能False:不能

(舉例說(shuō)明)焦點(diǎn):對(duì)象接受用戶鼠標(biāo)或鍵盤操作的能力

表現(xiàn)為對(duì)象的標(biāo)題或標(biāo)題欄突出顯示

現(xiàn)在是66頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24焦點(diǎn)定位(獲得焦點(diǎn))的方法：

鼠標(biāo)單擊或快捷鍵(運(yùn)行時(shí))Tab鍵（運(yùn)行時(shí)）SetFocus（代碼中）

.當(dāng)控件可見(jiàn)和可用時(shí)才能接受焦點(diǎn)

(Visible和Enabled為True).某些控件不具有焦點(diǎn)，如Label,Timer.Windows窗口中同一時(shí)刻只能有一個(gè)焦點(diǎn)現(xiàn)在是67頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/2414.控件默認(rèn)屬性 在VB中，把某個(gè)控件的最重要的屬性,稱為該控件的默認(rèn)屬性或值.

在使用默認(rèn)屬性或值時(shí)，可以不用指定控件的屬性名。

例如文本框的Text屬性（是其值或默認(rèn)屬性）

Text1.Text=“歡迎學(xué)習(xí)VB”Text1=“歡迎學(xué)習(xí)VB”二語(yǔ)句等價(jià)

現(xiàn)在是68頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.4.2窗體是VB中最重要的對(duì)象，用于創(chuàng)建VB應(yīng)用程序的用戶界面或?qū)υ捒?。一個(gè)工程文件中，至少應(yīng)包括一個(gè)窗體1.屬性(1)基本屬性：Name,Font……(2)Caption屬性現(xiàn)在是69頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(3)BorderStyle(邊框風(fēng)格)屬性

0—None:無(wú)邊框

1—FixedSingle:固定單線邊框

2—Sizeable:可調(diào)雙線邊框，缺省

3—FixedDialog:固定雙線邊框

4—FixedToolWindow:固定工具窗口

5—SizeableToolWindow:可變工具窗口現(xiàn)在是70頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(4)MaxButton和MinButton值為True或False只有BorderStyle屬性的值為1或2時(shí)起作用，且只能在屬性窗口設(shè)置(5)Icon屬性設(shè)置當(dāng)窗體最小化時(shí)的圖標(biāo)現(xiàn)在是71頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(6)ControlBox屬性值為True或False(7)Picture屬性在屬性窗口設(shè)置代碼中使用LoadPicture函數(shù)Form1.Picture=LoadPicture(“d:\image1.bmp”)現(xiàn)在是72頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(8)WindowState屬性0—Normal1—Minimized2—Maximized(9)MDIchild屬性(邏輯值)(10)AutoRedraw屬性(邏輯值)現(xiàn)在是73頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.常用事件(1)Load事件：窗體被裝入時(shí)（啟動(dòng)應(yīng)用程序），系統(tǒng)自動(dòng)觸發(fā)的事件?？稍谄鋬?nèi)進(jìn)行變量初始化,對(duì)窗體、空間的屬性進(jìn)行設(shè)置。現(xiàn)在是74頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(3)Deactivate事件(4)Resize事件(2)Activate事件：當(dāng)窗體成為活動(dòng)窗口時(shí)所觸發(fā)的事件

注意：Load事件、單擊、Show、SetFocus方法將觸發(fā)Activate事件

舉例說(shuō)明現(xiàn)在是75頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/243.常用方法Print，Cls，Move，Refresh，Show，Hide現(xiàn)在是76頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/241.定義是用于顯示文本或輸出信息的控件。

注意：不能作為輸入信息的界面2.標(biāo)簽屬性(NameCaptionAutosizeBorderstyle等)3.標(biāo)簽事件:Click、DblClick、Change(很少用)4.標(biāo)簽方法：Move（滾動(dòng)字幕）應(yīng)用舉例2-4

2.4.3標(biāo)簽（Label）現(xiàn)在是77頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

是一個(gè)文本編輯區(qū)域,用于處理與文本有關(guān)的內(nèi)容。如輸入、輸出、編輯、修改文本信息

1.屬性

(1)基本屬性(Name、Height、Font等)(2)Text（文本）屬性用于返回或設(shè)置文本框中的信息，無(wú)Caption屬性2.4.4文本框（TextBox）現(xiàn)在是78頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

.在程序運(yùn)行期間，VB自動(dòng)將輸入信息保存在文本框的Text屬性中。

.可以通過(guò)訪問(wèn)文本框的Text屬性獲得用戶輸入值。如:DimStr1AsStringStr1=Text1.Text

清除文本框內(nèi)容:Text1.Text=“”現(xiàn)在是79頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(3)MaxLength(最大長(zhǎng)度)屬性

設(shè)置文本框所允許輸入的最大字符數(shù).缺省值0,對(duì)字符數(shù)沒(méi)有限制。

注意:VB中一個(gè)漢字的長(zhǎng)度=一個(gè)西文字符(4)MultiLine（多行）屬性是否允許多行顯示。默認(rèn)False

True：允許

False：不允許

只能在屬性中設(shè)置，不能在程序中改變。現(xiàn)在是80頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(5)ScrollBars（滾動(dòng)條）屬性

為文本框添加滾動(dòng)條。（只有在MultiLine屬性為True時(shí)有效)

0——None（無(wú)）

1——Horizontal（水平滾動(dòng)條）

2——Vertical（垂直滾動(dòng)條）

3——Both（同時(shí)加）說(shuō)明：若加水平滾動(dòng)條,自動(dòng)換行功能無(wú)效,只有按Enter鍵才可換行.現(xiàn)在是81頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24(6)PasswordChar(口令)屬性將文本的顯示內(nèi)容全部替換為該屬性設(shè)置的字符.

在實(shí)際使用中,常與MaxLength

結(jié)合使用,用于設(shè)計(jì)密碼輸入框.如*,#

缺省值為空字符串,可以看到輸入內(nèi)容.(7)Locked屬性文本框是否可編輯.默認(rèn)False

True:不能編輯(相當(dāng)于標(biāo)簽)

False:

可以現(xiàn)在是82頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24SelStart、SelLength、SelText屬性在程序運(yùn)行中，標(biāo)識(shí)用戶選中的文本。

(用于設(shè)置插入點(diǎn)和范圍，選擇文本或清除文本，文本的剪切、復(fù)制和粘貼。)

注意:

只能在代碼中設(shè)置。

SelStart：

起始位置（非負(fù)長(zhǎng)整型）第一個(gè)字符位置為0SelLength：選中文本長(zhǎng)度（非負(fù)長(zhǎng)整型）

SelText：

選中文本內(nèi)容（字符串）

.若給其賦值,可用它替換選中文本;若沒(méi)選,則將字符串插入到當(dāng)前光標(biāo)所在處.

現(xiàn)在是83頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24例2-5：

在窗體單擊事件中，將選中文本框中的所有文本，并用“Thisisanewtext”代替。

PrivateSubForm_Click()

Text1.SelStart=0Text1.SelLength=Len(Text1.Text)Text1.SelText=“Thisisanewtext”

EndSub

例2-5現(xiàn)在是84頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.事件（1）Change（改變）事件（2）KeyPress（鍵盤按下）事件常用于判斷輸入是否回車（KeyAscii為13）（3）GotFocus（獲得焦點(diǎn)）事件鼠標(biāo)單擊或Tab鍵移到控件上（4）LostFocus（失去焦點(diǎn)）事件按Tab鍵移到其它控件或單擊其它控件。常用于對(duì)文本框中的內(nèi)容校驗(yàn)、過(guò)濾數(shù)據(jù)?，F(xiàn)在是85頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/243.方法

SetFocus(設(shè)置焦點(diǎn))

把光標(biāo)移到指定的文本框中格式:[對(duì)象名.]SetFocus

命令按鈕，復(fù)選框等也支持SetFocus方法4.文本框的應(yīng)用舉例2-6

2-7

2-8現(xiàn)在是86頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.4.5命令按鈕(最基本最常用的控件對(duì)象)

選中命令按鈕的三種方法（P47）（一）屬性

1.基本屬性(Name,Height,Font)

2.Caption（標(biāo)題）屬性：

用于設(shè)置命令按鈕的標(biāo)題，并可為命令按鈕創(chuàng)建快捷鍵，其方法為：

在設(shè)置Caption屬性，在作為快捷鍵的字母前加一個(gè)“&”

現(xiàn)在是87頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/243.Style(風(fēng)格）屬性

用于設(shè)置或返回命令按鈕的顯示類型和行為，只能在屬性窗口設(shè)置。

0—Standard(缺省):標(biāo)準(zhǔn)Windows風(fēng)格命令按鈕，按鈕上不能顯示圖形。

1—Graphical:圖形命令按鈕，按鈕上可以顯示圖形的樣式，與（Picture）屬性混用。 現(xiàn)在是88頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

4.Picture（圖片）屬性

該屬性只有在Style屬性設(shè)置為1時(shí)才有效，它為圖形命令按鈕裝入一幅示意圖（.bmp，.ico）。5.ToolTipText(工具顯示）屬性

用于設(shè)置當(dāng)鼠標(biāo)在控件上暫停時(shí)顯示的提示性文本。一般與Picture屬性同時(shí)使用，為圖形命令按鈕加簡(jiǎn)短文字說(shuō)明其功能。現(xiàn)在是89頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

6.Default（確認(rèn)）屬性：

只有命令按鈕支持Default屬性。

值為True時(shí)，按Enter鍵相當(dāng)于單擊該命令按鈕在一個(gè)窗體中，只能有一個(gè)按鈕的Default屬性設(shè)為True?，F(xiàn)在是90頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/247.Cancel(取消）屬性

值為True時(shí)，按Esc鍵相當(dāng)于單擊該命令按鈕在一個(gè)窗體中，只能有一個(gè)按鈕的Cancel屬性設(shè)為True?，F(xiàn)在是91頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

8.Value(檢查按鈕狀態(tài)）屬性：

該屬性只能在程序運(yùn)行期間設(shè)置或利用值為True時(shí)，用于以程序方式來(lái)引發(fā)該命令按鈕的Click事件，從而轉(zhuǎn)去執(zhí)行其相應(yīng)的程序。

例：若要在窗體的單擊事件程序中調(diào)用并執(zhí)行命令按鈕的Click事件過(guò)程，可用以下語(yǔ)句實(shí)現(xiàn)：

Command2.Value=True現(xiàn)在是92頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

(二)事件

命令按鈕的最基本最重要的事件就是Click（鼠標(biāo)單擊）

(三)方法

命令按鈕最常用的方法是SetFocus(設(shè)置焦點(diǎn)）該方法設(shè)置指定的命令按鈕獲得焦點(diǎn)，對(duì)獲得焦點(diǎn)的按鈕，按回車鍵等于單擊該按鈕。

注：使用SetFocus方法前，需將Enabled和Visible屬性均設(shè)為True現(xiàn)在是93頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24

(四)命令按鈕的應(yīng)用舉例

例2-9現(xiàn)在是94頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.5VB常用方法1.Print方法[對(duì)象名.]Print[{Spc(n)|Tab(n)}][表達(dá)式列表][；|，]作用:在對(duì)象上輸出信息參數(shù)含義：對(duì)象名：窗體、圖片框或打印機(jī)(Pinter),省略對(duì)象名時(shí)在窗體上輸出。語(yǔ)法格式：[對(duì)象名.]方法[參數(shù)列表]現(xiàn)在是95頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24參數(shù)含義(續(xù))：Spc(n)函數(shù)：插入n個(gè)空格，允許重復(fù)使用。Tab(n)函數(shù)：左端開(kāi)始右移動(dòng)n列，允許重復(fù)使用。表達(dá)式列表：數(shù)值或字符串表達(dá)式；省略時(shí)，輸出空行；(分號(hào))：光標(biāo)定位上一個(gè)顯示的字符后。，(逗號(hào))：光標(biāo)定位在下一個(gè)打印區(qū)的開(kāi)始位置處。每個(gè)打印區(qū)占14列?，F(xiàn)在是96頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24例在窗體Form1的單擊事件中寫入如下代碼：PrivateSubForm_Click()a=10:b=3.14:c=100Print"a=";a,"b=";bPrint"a=";a,"b=";bPrint

‘空一行

Print"a=";a,Tab(18);"b=";b

Print"a=";a,Spc(18);"b=";bPrint

PrintTab(18);“a=”;a,“b=”;b

‘從第18列開(kāi)始打印輸出

PrintSpc(18);"a=";a,"b=";b

EndSubprint實(shí)例

現(xiàn)在是97頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/242.Cls方法

形式:[對(duì)象名.]Cls

作用:

清除運(yùn)行時(shí)在窗體或圖形框中顯示的文本或圖形。

對(duì)象可以是：窗體、圖片框注意:

不清除在設(shè)計(jì)時(shí)的文本和圖形。清屏后坐標(biāo)當(dāng)前回到原點(diǎn)?，F(xiàn)在是98頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/243.Move方法

形式:

[對(duì)象名.]Move左邊距離[，上邊距離[，寬度[，高度]]]

作用:移動(dòng)窗體或控件，并可改變其大小。

對(duì)象名：可以是窗體及除時(shí)鐘、菜單外的所有控件，省略時(shí)代表窗體。

左邊距離，上邊距離，寬度，高度：數(shù)值表達(dá)式，以twip為單位。如果是窗體對(duì)象，則“左邊距”和“上邊距”是以屏幕左邊界和上邊界為準(zhǔn)。其它則是以窗體的左邊和上邊界為準(zhǔn)?，F(xiàn)在是99頁(yè)\一共有111頁(yè)\編輯于星期日2023/4/24例使用Move方法移動(dòng)一個(gè)窗體。雙擊窗體，窗體移動(dòng)并定位在屏幕的左上角，同時(shí)窗體的長(zhǎng)寬也縮小一倍。

PrivateSubForm_DblClick()

Form1.Move0,0,Form1.Width/2,_Form1.Height/2EndSubmove示例現(xiàn)在是100頁(yè)\一共有111頁(yè)\編輯于星期日202