VisualBasic編程基礎(chǔ)課件

VisualBasic編程基礎(chǔ)

第2章本章要點(diǎn)事件驅(qū)動(dòng)編程機(jī)制窗體及基本控件幾個(gè)常用的語句1.對(duì)象的概念在現(xiàn)實(shí)生活中，對(duì)象是具有某些特性的具體事物，如一個(gè)人、一臺(tái)電腦等；在面向?qū)ο蟪绦蛑?，?duì)象就是系統(tǒng)中運(yùn)行的基本實(shí)體，如一個(gè)窗體、一個(gè)命令按鈕等。

任何一個(gè)對(duì)象都有屬性、事件和方法三個(gè)要素，各從不同的角度表達(dá)了對(duì)象的構(gòu)成，通過三者有機(jī)的結(jié)合，便構(gòu)成一個(gè)完整的VB應(yīng)用程序。2.1事件驅(qū)動(dòng)編程機(jī)制2.1.1對(duì)象和類的概念

2.類的概念類是同種對(duì)象的集合與抽象，它包含所創(chuàng)建對(duì)象的屬性描述和行為特征的定義。類是對(duì)象的定義，而對(duì)象是類的一個(gè)實(shí)例。如汽車是類，某一輛具體的小轎車是對(duì)象。在VB中，工具箱中的可視類圖標(biāo)是VB系統(tǒng)設(shè)計(jì)好的標(biāo)準(zhǔn)控件類，此外，還可在“工程”菜單的“部件”項(xiàng)中加入大量的ActiveX控件。當(dāng)在窗體上畫一個(gè)控件時(shí)就是將類實(shí)例化（把類轉(zhuǎn)換為對(duì)象），即創(chuàng)建了一個(gè)控件對(duì)象，簡(jiǎn)稱控件。2.1事件驅(qū)動(dòng)編程機(jī)制2.1.1對(duì)象和類的概念

內(nèi)部控件ActiveX控件

（前20個(gè)）控件類：2.1事件驅(qū)動(dòng)編程機(jī)制2.1.1對(duì)象和類的概念

對(duì)象類2.1事件驅(qū)動(dòng)編程機(jī)制2.1.1對(duì)象和類的概念

對(duì)象屬性屬性解釋屬性顯示方式（1）利用“屬性”窗口編輯對(duì)象的屬性

在“工程設(shè)計(jì)”窗口選中要設(shè)置屬性的對(duì)象，選擇“視圖”菜單“屬性窗口”項(xiàng)，打開“屬性”窗口；或右擊對(duì)象，在快捷菜單選擇“屬性窗口”。2.1事件驅(qū)動(dòng)編程機(jī)制2.1.2對(duì)象的屬性、方法和事件

（2）利用屬性設(shè)置語句格式1：[<父類名>].<對(duì)象名>.屬性名=<屬性值>

例：PrivateSubForm_Load()Cmd1.Caption="退出"Cmd1.Left=4680Cmd1.Top=5280Cmd1.Height=615Cmd1.Width=1335EndSub2.1事件驅(qū)動(dòng)編程機(jī)制2.1.2對(duì)象的屬性、方法和事件

格式2：With<對(duì)象名><屬性值表>Endwith例：PrivateSubForm_Load()WithCmd1.Caption="退出".Left=4680.Top=5280.Height=615.Width=1335EndWithEndSub2.1事件驅(qū)動(dòng)編程機(jī)制2.1.2對(duì)象的屬性、方法和事件

定義事件過程的語句格式：

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

<程序代碼>

EndSub例如：PrivateSubCommand1_Click()

Command1.FontSize=20'字體大小為20磅

……

EndSub注意:用戶對(duì)一個(gè)對(duì)象發(fā)出一個(gè)動(dòng)作時(shí)，可能同時(shí)觸發(fā)多個(gè)事件(如Click、MouseDown、MouseUp),寫程序時(shí)只需對(duì)感興趣的事件過程編碼，沒有編碼的空事件不加處理。2.1事件驅(qū)動(dòng)編程機(jī)制2.1.2對(duì)象的屬性、方法和事件

3.方法

方法是附屬于對(duì)象的行為和動(dòng)作，也可以將其理解為指示對(duì)象動(dòng)作的命令，即VB系統(tǒng)提供的一種特殊的過程和函數(shù)。

VB中的內(nèi)部控件都具有定義好的方法，不同的對(duì)象有不同的方法。（請(qǐng)見附錄）調(diào)用方法的語句格式：

[<對(duì)象名>].方法名

例如：Form1.Print“GoodMorning!”

Picture1.Cls2.1事件驅(qū)動(dòng)編程機(jī)制2.1.2對(duì)象的屬性、方法和事件

4.利用“代碼”窗口編輯對(duì)象的事件和方法

（1）在“工程設(shè)計(jì)”窗口選中某一對(duì)象，選擇“視圖”菜單“代碼窗口”項(xiàng)，或使用右鍵菜單，或雙擊某一對(duì)象，打開其“代碼”窗口；（2）在“代碼”窗口通過“對(duì)象”組合框選擇對(duì)象，通過“事件”組合框選擇事件，系統(tǒng)自動(dòng)給出事件過程的開頭和結(jié)束語句。（3）在過程的開頭和結(jié)束語句之間輸入代碼。2.1事件驅(qū)動(dòng)編程機(jī)制2.1.2對(duì)象的屬性、方法和事件

兩個(gè)基本要點(diǎn)：

（1）應(yīng)用程序由對(duì)象組成，每個(gè)對(duì)象都有預(yù)先定義的事件，每個(gè)事件的發(fā)生都依賴于一定的條件（即用戶的驅(qū)動(dòng)或來自系統(tǒng)的觸發(fā)）。（2）每個(gè)事件發(fā)生后系統(tǒng)該作出什么反應(yīng)，則取決于用戶給該事件過程編寫了什么代碼，即由用戶控制事件的發(fā)生，由代碼做出響應(yīng)。

2.1事件驅(qū)動(dòng)編程機(jī)制2.1.3事件驅(qū)動(dòng)編程的基本要點(diǎn)

2.1事件驅(qū)動(dòng)編程機(jī)制

例2-1建立一個(gè)顯示當(dāng)前時(shí)間的窗體，將窗體名稱改為frmTime。在窗體上添加3個(gè)命令按鈕，將它們的名稱屬性分別改為CmdRed、CmdBlue和CmdExit，Caption屬性分別設(shè)置為“紅色顯示”、“藍(lán)色顯示”和“退出”。再添加一個(gè)標(biāo)簽按鈕，不修改其名稱。利用VisualBasic的Time函數(shù)獲取當(dāng)前的系統(tǒng)時(shí)間，并在標(biāo)簽中顯示時(shí)間。要求程序一啟動(dòng)就在標(biāo)簽中顯示機(jī)器的當(dāng)前時(shí)間，若單擊CmdRed按鈕標(biāo)簽中的時(shí)間紅色顯示，單擊CmdBlue按鈕時(shí)間以藍(lán)色顯示，單擊CmdExit按鈕則結(jié)束程序運(yùn)行。2.1.3事件驅(qū)動(dòng)編程的基本要點(diǎn)

2.1事件驅(qū)動(dòng)編程機(jī)制程序演示2.1.3事件驅(qū)動(dòng)編程的基本要點(diǎn)

（4）窗體邊框風(fēng)格：BorderStyle屬性（5）窗體顯示狀態(tài)：WindowsState屬性（6）其它屬性：

BackColor、Picture、ForeColor、

FontName、FontSize、FontBold、FontItalic、

FontStrikeThru、FontUnderLine、Enabled、Visible、AutoRedraw2.2窗體及基本控件2.2.1窗體對(duì)象

2.窗體常用的方法

（1）Print方法：在窗體上輸出表達(dá)式的值。

（2）Cls方法：清除在窗體顯示的文本或圖形。

（3）Move方法：移動(dòng)窗體并可改變其大小。（4）Show方法：<窗體名>.Show

功能：在屏幕上顯示一個(gè)窗體。（5）Hide方法：<窗體名>.Hide

功能：使指定的窗體隱藏起來，但不從內(nèi)存中

刪除窗體。2.2窗體及基本控件2.2.1窗體對(duì)象

3.窗體常用的事件

（1）Load：窗體被裝入時(shí)觸發(fā)的事件，該事件通常用來在啟動(dòng)應(yīng)用程序時(shí)對(duì)屬性和變量進(jìn)行初始化。（2）Click：?jiǎn)螕舸绑w時(shí)觸發(fā)的事件。（3）DblClick：雙擊窗體時(shí)觸發(fā)的事件。（4）Activate事件：當(dāng)窗體變成活動(dòng)窗體時(shí)，觸發(fā)該事件。（5）UnLoad事件：將窗體從內(nèi)存中卸載時(shí)，觸發(fā)該事件。2.2窗體及基本控件2.2.1窗體對(duì)象

應(yīng)用示例

例2-3

創(chuàng)建兩個(gè)窗體，通過Form_Click()事件實(shí)現(xiàn)兩個(gè)窗體的切換。

2.2窗體及基本控件2.2.1窗體對(duì)象

程序演示

標(biāo)簽（Label）是用于顯示文本信息的控件。

1.標(biāo)簽常用的屬性（1）名稱（Name）（2）Top、Left、Height、Width（3）Caption：標(biāo)簽內(nèi)顯示的文本信息（4）BackStyle：背景是否透明（5）AutoSize：標(biāo)簽大小是否可自動(dòng)調(diào)整（6）Alignment：標(biāo)簽內(nèi)文本的對(duì)齊方式（7）WordWrap：是否可折行顯示文本（8）BorderStyle：邊框樣式2.2窗體及基本控件2.2.2標(biāo)簽對(duì)象

2.2窗體及基本控件2.2.3文本框?qū)ο?/p>

文本框（Text）是一個(gè)文本編輯區(qū)域，可在該區(qū)域輸入、編輯和顯示文本內(nèi)容。

1.文本框常用的屬性（1）名稱（Name）（2）Text:文本框中顯示或接收的內(nèi)容（3）Maxlength：允許的最大長(zhǎng)度（4）MultiLine：是否允許多行顯示（5）ScrollBars：是否加滾動(dòng)條（6）Locked：Text中的內(nèi)容是否可編輯（7）PassWordChar：設(shè)置輸入掩碼

（8）SelText：被選擇的文本內(nèi)容（9）SelStart：被選擇的文本的起始位置（10）SelLength：被選擇的文本長(zhǎng)度（11）其它屬性：

Height、Width、Top、Left、Enabled、

Visible、Font、ForeColor、BackColor、

FontName、FontSize、FontBold、FontItalic、

FontStrikeThru、Alignment等。

2.2窗體及基本控件2.2.3文本框?qū)ο?/p>

2.文本框常用的方法——SetFocus

SetFocus方法格式如下：[<對(duì)象名>.]SetFocus功能：把光標(biāo)（焦點(diǎn)）移到[<對(duì)象名>.]指定的文本框上。當(dāng)在窗體上建立了多個(gè)文本框后，可以用該方法把光標(biāo)置于所需要的文本框中。2.2窗體及基本控件2.2.3文本框?qū)ο?/p>

3.文本框常用的事件（1）Change：改變文本框的Text屬性時(shí)觸發(fā)的事件。（2）KeyPress：?jiǎn)螕翩I盤某一鍵并釋放該按鍵時(shí)觸發(fā)

的事件，并返回一個(gè)KeyAscii參數(shù)。（3）KeyDown：控件獲得焦點(diǎn)，或按下鍵盤某一鍵時(shí)

觸發(fā)的事件。（4）KeyUp：控件失去焦點(diǎn)，或釋放鍵盤上一個(gè)鍵時(shí)

觸發(fā)的事件。（5）LostFocus：控件失去焦點(diǎn)時(shí)觸發(fā)的事件。（6）GotFocus：控件獲得焦點(diǎn)時(shí)觸發(fā)的事件。2.2窗體及基本控件2.2.3文本框?qū)ο?/p>

例2-5

設(shè)計(jì)一個(gè)如下圖所示的輸入密碼窗體。演示程序2.2窗體及基本控件2.2.3文本框?qū)ο?/p>

2.2窗體及基本控件

例2-6設(shè)計(jì)一個(gè)“個(gè)人信息登記表”窗體，程序運(yùn)行結(jié)果如下圖所示。

2.2.3文本框?qū)ο?/p>

演示程序2.2窗體及基本控件2.2.4命令按鈕對(duì)象

命令按鈕（CommandButton）是用于控制程序的進(jìn)程，即控制過程的啟動(dòng)、中斷或結(jié)束。

1.命令按鈕常用的屬性（1）名稱（Name）（2）Caption：命令按鈕顯示標(biāo)題(可在某字母前

加“&”設(shè)置快捷鍵)（3）Default：設(shè)置Enter鍵默認(rèn)的命令按鈕（4）Cancel：設(shè)置Esc鍵默認(rèn)的命令按鈕（5）Style：按鈕的顯示風(fēng)格（6）Picture：設(shè)置按鈕的圖形標(biāo)題（7）ToolTipText：設(shè)置工具欄提示（8）其它屬性

Height、Width、Top、Left、Enabled、Visible、Font組屬性、BackColor等。

2.命令按鈕常用的事件

Click：?jiǎn)螕羰髽?biāo)時(shí)觸發(fā)；也可以使用Tab鍵，將焦點(diǎn)跳轉(zhuǎn)到指定的命令按鈕上，再按回車鍵觸發(fā)；還可以通過快捷鍵(Alt+下劃線的字母)觸發(fā)；

MouseDown、MouseUp、MouseMove：鼠標(biāo)按下、釋放、移過時(shí)觸發(fā)。2.2窗體及基本控件2.2.4命令按鈕對(duì)象

例2-7建立一個(gè)允許剪切、復(fù)制和粘貼的簡(jiǎn)單文字處理程序。程序運(yùn)行結(jié)果如圖所示。演示程序2.2窗體及基本控件2.2.4命令按鈕對(duì)象

2.2窗體及基本控件2.2.5定時(shí)器對(duì)象

定時(shí)器(Timer)又稱計(jì)時(shí)器、時(shí)鐘控件，用于按指定的時(shí)間間隔、有規(guī)律地重復(fù)執(zhí)行程序代碼。

定時(shí)器是基于系統(tǒng)內(nèi)部時(shí)鐘進(jìn)行計(jì)時(shí)。在設(shè)計(jì)階段時(shí)鐘控件出現(xiàn)在窗體中，在程序運(yùn)行時(shí)則是不可見的。1.定時(shí)器常用的屬性

（1）名稱（Name）

（2）Interval：返回或設(shè)置引發(fā)Timer事件的時(shí)間間隔長(zhǎng)度，單位為毫秒（ms，1ms=0.001s）

（3）Enabled：決定Timer控件是否開始使用。2.定時(shí)器按鈕常用的事件——Timer當(dāng)Enabled屬性值為True，而且Interval屬性值大于0時(shí)，以Interval屬性指定的時(shí)間間隔觸發(fā)事件。

例2-8創(chuàng)建一個(gè)“電子時(shí)鐘”窗體，通過Command控件進(jìn)行時(shí)間和日期的切換，程序運(yùn)行結(jié)果如圖：2.2窗體及基本控件2.2.5定時(shí)器對(duì)象

例2-9設(shè)計(jì)一個(gè)流動(dòng)字幕，程序運(yùn)行結(jié)果如圖：2.2窗體及基本控件2.2.5定時(shí)器對(duì)象

演示程序2.3幾個(gè)常用的語句

用賦值語句可以把指定的值賦給某個(gè)變量或某個(gè)帶有屬性的對(duì)象。一般格式為：[Let]變量=表達(dá)式[Let]對(duì)象.屬性=表達(dá)式例如：Total=99'把數(shù)值常量賦給變量TotalTextl.Text=""'把文本框Textl清空Command1.Caption="結(jié)束"'命令按鈕標(biāo)題為“結(jié)束”Text2.Text=Textl.Text'使Text2的Text屬性值和Textl相同2.3.1賦值語句

2.3幾個(gè)常用的語句

說明：（1）賦值語句兼有計(jì)算與賦值雙重功能，它首先計(jì)算賦值號(hào)右邊表達(dá)式的值，再把結(jié)果賦給賦值號(hào)左邊的變量。（2）在賦值語句中，“=”是賦值號(hào)，與數(shù)學(xué)上的等號(hào)意義不一樣。例如，語句n=n+1表示將變量n的值加上1后的結(jié)果再賦值給變量n，而不表示等號(hào)兩邊的值是否相等。（3）賦值號(hào)左邊只能是變量或?qū)ο髮傩?，不能出現(xiàn)常量或表達(dá)式。（4）變量或?qū)ο髮傩缘念愋蛻?yīng)與表達(dá)式的類型相容。2.3.1賦值語句

2.3幾個(gè)常用的語句

例2-10求一元二次方程2x2+3x+1=0的根。2.3.1賦值語句

演示程序

為了提高程序的可讀性，通常應(yīng)在程序的適當(dāng)位置加上必要的注釋。VisualBasic中的注釋語句以“Rem”或撇號(hào)“'”開頭。一般格式為：Rem注釋內(nèi)容'注釋內(nèi)容2.3.2注釋語句

2.3幾個(gè)常用的語句

說明：（1）注釋語句是非執(zhí)