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

第二章VB基本控件及簡(jiǎn)單程序設(shè)計(jì)

1.了解程序設(shè)計(jì)方法的發(fā)展；2.理解面向?qū)ο蟪绦蛟O(shè)計(jì)概念；3.理解對(duì)象、屬性、事件、和方法等基本概念；4.掌握建立簡(jiǎn)單的應(yīng)用程序的方法和步驟；5.熟悉一些基本控件和屬性的設(shè)置；6.掌握工程的管理及環(huán)境的設(shè)置；本章要求：2.1程序設(shè)計(jì)方法概述1.初期的程序設(shè)計(jì)

高運(yùn)行效率、少占用內(nèi)存為目標(biāo)2.結(jié)構(gòu)化程序設(shè)計(jì)

程序的可讀性、可維護(hù)性為目標(biāo)程序=算法+數(shù)據(jù)結(jié)構(gòu)+計(jì)算機(jī)語(yǔ)言+面向過(guò)程的程序設(shè)計(jì)方法3.面向?qū)ο蟮某绦蛟O(shè)計(jì)

降低程序的復(fù)雜性、提高軟件的開(kāi)法效率和改善工作界面為目標(biāo)程序=對(duì)象+消息+面向?qū)ο蟮某绦蛟O(shè)計(jì)面向?qū)ο蟮某绦蛟O(shè)計(jì)具有如下的優(yōu)點(diǎn)：1．符合人們習(xí)慣的思維方法，便于分解大型的復(fù)雜多變的問(wèn)題。由于對(duì)象對(duì)應(yīng)于現(xiàn)實(shí)世界中的實(shí)體，因而可以很自然地按照現(xiàn)實(shí)世界中處理實(shí)體的方法來(lái)處理對(duì)象，軟件開(kāi)發(fā)者可以很方便地與問(wèn)題提出者進(jìn)行溝通和交流。

2．易于軟件的維護(hù)和功能的增減。對(duì)象的封裝性及對(duì)象之間的松散組合，都給軟件的修改和維護(hù)帶來(lái)了方便。3．可重用性好。重復(fù)使用一個(gè)類（類是對(duì)象的定義，對(duì)象是類的實(shí)例化），可以比較方便地構(gòu)造出軟件系統(tǒng)，加上繼承的方式，極大地提高了軟件開(kāi)發(fā)的效率。4．與可視化技術(shù)相結(jié)合，改善了工作界面。隨著基于圖形界面操作系統(tǒng)的流行，面向?qū)ο蟮某绦蛟O(shè)計(jì)方法也將深入人心。它與可視化技術(shù)相結(jié)合，使人機(jī)界面進(jìn)入GUI時(shí)代。工具箱的各種控件并不是對(duì)象，而是代表了各個(gè)不同的類。通過(guò)類的實(shí)例化，可以得到真正的對(duì)象。當(dāng)在窗體上畫(huà)一個(gè)控件時(shí)，就將類轉(zhuǎn)換為對(duì)象，即創(chuàng)建了一個(gè)控件對(duì)象，也簡(jiǎn)稱為控件。VB中的類與對(duì)象3、對(duì)象的建立和命名（1）對(duì)象的建立

方法一：

單擊工具箱控件對(duì)象在窗體上按住左鍵拖拉到所需要的大小后釋放。

方法二：

雙擊工具箱控件對(duì)象，則立即在窗體出現(xiàn)一個(gè)默認(rèn)大小的對(duì)象框。（2）編輯對(duì)象

先選中對(duì)象（單擊對(duì)象），放大、縮小刪除對(duì)象復(fù)制對(duì)象（3）、對(duì)象的命名

每一個(gè)對(duì)象都有有自己的名字。每個(gè)窗體、控件對(duì)象在建立時(shí)VB系統(tǒng)給出了一個(gè)默認(rèn)名。用戶可通過(guò)屬性窗口設(shè)置（名稱）來(lái)給對(duì)象命名。命名的原則：1）必須由字母或漢字開(kāi)頭、隨后可以是字母、漢字、數(shù)字、下劃線（最好不用）串組成。2）長(zhǎng)度<=255個(gè)字符。本教材采用智能化命規(guī)則：用前3個(gè)小定字母組成前綴（指明對(duì)象的類型）和表示該對(duì)象作用的縮寫(xiě)字母組成。附表2_1三、事件（Event）及事件過(guò)程（EventProcedure）

事件——可被對(duì)象識(shí)別的動(dòng)作。事件過(guò)程——是指附在該對(duì)象上的程序代碼，是事件觸發(fā)后處理的程序。事件過(guò)程的形式如下：Sub對(duì)象名_事件過(guò)程名[（參數(shù)列表）]…..(事件過(guò)程代碼）EndSub

例如：

SubcmdHide_Click()CmdHide.Visible=FalseEndSub四、方法（Method）

在對(duì)象上可操作的過(guò)程，是VB系統(tǒng)提供的一種特殊的過(guò)程和函數(shù)——方法。方法是面向?qū)ο蟮?，所以?duì)象的方法調(diào)用一般要指明對(duì)象。對(duì)象方法調(diào)用形式：

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

如省略對(duì)象，表示在當(dāng)對(duì)象，一般指窗體。例如：

Form1.print"VB程序設(shè)計(jì)"五、VB應(yīng)用程序的工作方式VB應(yīng)用程序采用的是以事件驅(qū)動(dòng)應(yīng)用程序的工作方式。下面是事件驅(qū)動(dòng)應(yīng)用程序中的典型工作方式：1、啟動(dòng)應(yīng)用程序，裝載和顯示窗體。2、窗體（或窗體上的控件）接收事件。事件可由用戶引發(fā)（例如通過(guò)鍵盤(pán)或鼠標(biāo)操作），可由系統(tǒng)引發(fā)（例如定時(shí)器事件），也可由代碼間接引發(fā)（例如當(dāng)代碼裝載窗體時(shí)的Load事件）。3、如果在相應(yīng)的事件過(guò)程中已編寫(xiě)了相應(yīng)的程序代碼，就執(zhí)行該代碼。4、應(yīng)用程序等待下一次事件。一.屬性（一）基本屬性1.Name名稱屬性（任何對(duì)象都具有的）

創(chuàng)建的對(duì)象名稱,有默認(rèn)的名.在程序中，控件名是作為對(duì)象的標(biāo)識(shí)而引用，不會(huì)顯示在窗體上。2.Height、width、top和left屬性

單位為twip：1twip=1/20點(diǎn)=1/1440英寸=1/567cm

注意：這四個(gè)屬性決定窗體（或控件）的大小，在容器中的位置。如右圖。3．Caption標(biāo)題屬性：決定出現(xiàn)在窗體的標(biāo)題欄上的文本內(nèi)容，也是當(dāng)窗體被最小化后出現(xiàn)在窗體圖標(biāo)下的文本。如圖2-2中窗體的Caption屬性值是“VB窗體”4字體Font屬性組

FontName屬性是字符型，決定對(duì)象上正文的字體（缺省為宋體）。FontSize屬性是整型，決定對(duì)象上正文的字體大小。FontBold屬性是邏輯型，決定對(duì)象上正文是否是粗體。FontItalic屬性是邏輯型，決定對(duì)象上正文是否是斜體。FontStrikeThru屬性是邏輯型，決定對(duì)象上正文是否加一刪除線。FontUnderLine屬性是邏輯型，決定對(duì)象上正文是否帶下劃線。

5.Enabled屬性（邏輯值）決定控件是否可操作。True：允許用戶進(jìn)行操作，并對(duì)操作出響應(yīng)（缺省值）。False：呈暗淡色，禁止用戶進(jìn)行操作。6.Visible屬性（邏輯值）決定控件是否可見(jiàn)True：運(yùn)行時(shí)控件可見(jiàn)（缺省值）。False：運(yùn)行時(shí)控件隱藏，用戶看不到，但控件本身是存在的。（二）窗體的其它常用屬性1．MaxButton最大化按鈕和MinButton最小化按鈕：當(dāng)值為T(mén)ure，有最大或最小化按鈕，F(xiàn)alse則無(wú)。2．Icon控制圖標(biāo)屬性：返回或設(shè)置窗體左上角顯示或最小化時(shí)顯示的圖標(biāo)。注意：此屬性必須在ControlBox屬性設(shè)置為T(mén)ure才有效3．ControlBox控制菜單框?qū)傩裕涸O(shè)置Ture為有，如設(shè)置為False則無(wú)控件菜單，同時(shí)窗體也無(wú)最大化按鈕和最小化按鈕，即使MaxButton屬性和MinButton屬性設(shè)置為T(mén)ure。4．Picture圖片屬性：設(shè)置窗體中要顯示的圖片。加載圖片操作同Icon控制圖標(biāo)屬性。5.BorderStyle：邊框風(fēng)格,通過(guò)改變BorderStyle屬性，可以控制窗體如何調(diào)整大小。

0-None：無(wú)邊框；1-FixedSingle：?jiǎn)尉€邊框，不可以改變窗口大?。?-Sizable：雙線邊框，可以改變窗口大??；3-FixedDouble：雙線框架，不可以改變窗口大小。4-FixedToolWindow:窗體外觀與工具條相似。有關(guān)閉按鈕，不可以改變窗口大小。5-SizableToolWindow：窗體外觀與工具條相似。有關(guān)閉按鈕，可以改變窗口大小。6.WindowsState屬性 0-Normal：正常窗口狀態(tài)，有窗口邊界； 1：最小化狀態(tài)，以圖標(biāo)方式運(yùn)行； 2：最大化狀態(tài)，無(wú)邊框，充滿整個(gè)屏幕。

7.AutoRedraw屬性 該屬性決定窗體被隱藏或被另一窗口覆蓋之后重新顯示，是否重新還原該窗體被隱藏或覆蓋以前的畫(huà)面。即是否重畫(huà)如Circle、Line、Pset和Print等方法的輸出。當(dāng)為T(mén)rue時(shí)，重新還原該窗體以前的畫(huà)面。當(dāng)為False時(shí)，則不重畫(huà)AutoRedraw屬性。三、常用方法窗體常用的方法有：打印輸出Print、移動(dòng)Move、清除Cls、顯示Show、隱藏Hide等方法。方法是面向?qū)ο蠊适褂玫男问?[對(duì)象.]方法1.Print方法

形式:[對(duì)象.]Print[{Spc(n)|Tab(n)}][表達(dá)式列表][；|，]作用:在對(duì)象上輸出信息對(duì)象：窗體、圖形框或打印機(jī)(Pinter),省略對(duì)象在窗體上輸出。Spc(n)函數(shù)：插入n個(gè)空格，允許重復(fù)使用。Tab(n)函數(shù)：左端開(kāi)始右移動(dòng)n列，允許重復(fù)使用。；(分號(hào))：光標(biāo)定位上一個(gè)顯示的字符后。，(逗號(hào))：光標(biāo)定位在下一個(gè)打印區(qū)的開(kāi)始位置處。每個(gè)打印區(qū)占14列。無(wú)；，換行。

開(kāi)始打印的位置是由對(duì)象的CurrentX和CurrentX屬性決定，缺省為打印對(duì)象的左上角0，0。例2.3在窗體Form1的單擊事件中寫(xiě)入如下代碼：PrivateSubForm_Click()a=10:b=3.14:c=100Print"a=";a,"b=";bPrint"a=";a,"b=";bPrint"a=";a,"b=";bPrint

‘空一行Print;"a=";a,"b=";bPrint"a=";a,Tab(18);"b=";b

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

Print"a=";a,"b=";bPrintTab(18);“a=”;a,“b=”;b

‘

從第18列開(kāi)始打印輸出PrintSpc(18);"a=";a,"b=";b

EndSub2.Cls方法

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

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

注意:不清除在設(shè)計(jì)時(shí)的文本和圖形。清屏后坐標(biāo)當(dāng)前回到原點(diǎn)。3.Move方法形式:

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

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

對(duì)象：可以是窗體及除時(shí)鐘、菜單外的所有控件，省略代表窗體。左邊距離，上邊距離，寬度，高度：數(shù)值表達(dá)式，以twip為單位。如果是窗體對(duì)象，則“左邊距”和“上邊距”是以屏幕左邊界和上邊界為準(zhǔn)。其它則是以窗體的左邊和上邊界為準(zhǔn)。說(shuō)明（1）它有兩種可能值：vbModal（缺?。┗騰bModeless，Show方法的可選參數(shù)表示從當(dāng)前窗口或?qū)υ捒蚯袚Q到其他窗口或?qū)υ捒蛑坝脩舯仨毑扇〉膭?dòng)作。當(dāng)參數(shù)為vbModal時(shí)，要求用戶必須對(duì)當(dāng)前的窗口或?qū)υ捒蜃龀鲰憫?yīng)，才能切換到其他窗口。（2）如果要顯示的窗體事先未裝入，該方法會(huì)自動(dòng)裝入該窗體再顯示。5．Hide(隱藏)方法Hide方法用于使指定的窗體不顯示，但不從內(nèi)存中刪除窗體。其調(diào)用格式為：

窗體名.Hide例2.5實(shí)現(xiàn)將指定的窗體在屏幕上進(jìn)行顯示或隱藏的切換。為了實(shí)現(xiàn)這一功能，可以在窗體Forml的“代碼”窗口中輸入下列代碼：PrivateSubForm_Click()Form1.Hide'隱藏窗體MsgBox"單擊確定按鈕，使窗體重現(xiàn)屏幕"'顯示信息Forml.Show'重現(xiàn)窗體EndSub

說(shuō)明：當(dāng)一個(gè)窗體從屏幕上隱去時(shí)，其Visible屬性被設(shè)置成False，并且該窗體上的控件也變得不可訪問(wèn)，但對(duì)運(yùn)行程序間的數(shù)據(jù)引用無(wú)影響。若要隱去的窗體沒(méi)有裝入，則Hide方法會(huì)裝入該窗體但不顯示。二、標(biāo)簽Label用于顯示文本(輸出)信息，不能作為輸入信息的界面。1．基本屬性Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等與窗體的使用相同。

2．常用屬性（1）Caption屬性Caption屬性用來(lái)改變Label控件中顯示的文本。Caption屬性允許文本的長(zhǎng)度最多為1024字節(jié)。缺省情況下，當(dāng)文本超過(guò)控件寬度時(shí)，文本會(huì)自動(dòng)換行，而當(dāng)文本超過(guò)控件高度時(shí)，超出部分將被裁剪掉。（2）Alignment屬性設(shè)置Caption屬性中文本的對(duì)齊方式，共有三種可選值：

0左對(duì)齊(LeftJustify)；1右對(duì)齊(RightJustify)；2居中對(duì)齊(CenterJustify)。（3）BackStyle屬性該屬性用于確定標(biāo)簽的背景是否透明。有兩種情況可選：值為0時(shí)，表示背景透明，標(biāo)簽后的背景和圖形可見(jiàn)；值為1時(shí)，表示不透明，標(biāo)簽后的背景和圖形不可見(jiàn)。（4）AutoSize屬性AutoSize屬性確定標(biāo)簽是否會(huì)隨標(biāo)題內(nèi)容的多少自動(dòng)變化。如果值為T(mén)rue，則隨Caption內(nèi)容的大小自動(dòng)調(diào)整控件本身的大小，且不換行；如果值為False，表示標(biāo)簽的尺寸不能自動(dòng)調(diào)整，超出尺寸范圍的內(nèi)容不予顯示。例2.6在窗體上，放置5個(gè)標(biāo)簽，其名稱使用默認(rèn)值Label1－Label5，它們的高度與寬度相同，在屬性窗口，按下表設(shè)置它們的屬性

默認(rèn)控件名Name標(biāo)題Caption有關(guān)屬性設(shè)置Label1左對(duì)齊Alignment=0，BorderStyle=1Label2水平居中Alignment=1，BorderStyle=1Label3自動(dòng)AutoSize=True，WordWarp=False，BorderStyle=1Label4背景白BackColor=&H00FFFFFF&，BorderStyle=0Label5前景紅ForeColor=&H000000FF&，BorderStyle=0（5）WordWrap屬性設(shè)置后各標(biāo)簽的顯示如下圖3、事件標(biāo)簽可響應(yīng)單擊（Click)和雙擊（DblClick）事件，但一般情況不對(duì)它進(jìn)行編程三、

文本框TextBox是一個(gè)文本編輯區(qū)域，可在該區(qū)域輸入，編輯和顯示正文內(nèi)容。（一）屬性1．基本屬性

Name、Height、Width、Top、Left、Enabled、Visible、Font，F(xiàn)oreColor、BackColor等與標(biāo)簽控件相同。

2．常用屬性（1）.Text文本屬性在文本框中顯示的正文內(nèi)容存放在Text屬性中。當(dāng)程序運(yùn)行時(shí)，用戶通過(guò)鍵盤(pán)輸入正文內(nèi)容，保存在Text屬性中。

文本框沒(méi)有Caption屬性（2）Maxlength：設(shè)置正文的最多字符個(gè)數(shù),

0任意長(zhǎng)度值。（3）MultiLine：是否為多行,默認(rèn)一行.False（4）ScrollBars：

當(dāng)MultiLine為T(mén)rue時(shí),該屬性才有效,滾動(dòng)條的形式。

0-None：無(wú)滾動(dòng)條、1-Horizontal：水平滾動(dòng)條、2-Vertical垂直滾動(dòng)條、3-Both水平和垂直滾動(dòng)條。（5）Locked：是否可被編輯屬性，F(xiàn)alse，表示為可編輯。（6）PassWordChar屬性設(shè)置PasswordChar屬性為了掩蓋文本框中輸入的字符。該屬性的設(shè)置只有在MultiLine設(shè)為

False才有效（7）SelStart、SelLength和SelText屬性這三個(gè)屬性是文本框中對(duì)文本的編輯屬性。SelStart：確定在文本框選中文本的起始位置。第一字符的位置為0。若沒(méi)有選擇文本，則用于返回或設(shè)置文本的插入點(diǎn)位置，如果SelStart的值大于文本的長(zhǎng)度，則SelStart取當(dāng)前文本的長(zhǎng)度：SelLength：設(shè)置或返回文本框中選定的文本字符串長(zhǎng)度（字符個(gè)數(shù)）。SelText：設(shè)置或返回當(dāng)前選定文本中的文本字符串。（二）常用事件

Change：

當(dāng)改變文本框的Text屬性時(shí)會(huì)引發(fā)該事件。當(dāng)用輸入一個(gè)字符，就會(huì)觸發(fā)一次Change事件。

KeyPress(KeyAsciiAsInteger)：

當(dāng)用戶按下并釋放鍵盤(pán)上一個(gè)ANSI鍵