山東外貿(mào)學(xué)院VB第3章簡單VB程序設(shè)計(jì)課件

VisualBasic程序設(shè)計(jì)E-mail：信息管理系第3章簡單VB程序設(shè)計(jì)本章主要內(nèi)容1、窗體2、命令按鈕3、文本框4、標(biāo)簽5、賦值語句6、Print方法7、輸入框8、消息框9、注釋與結(jié)束語句10、程序調(diào)試本章小結(jié)

作業(yè)退出窗體（Form）是一塊“畫布”，在窗體上可以直觀地建立應(yīng)用程序。在設(shè)計(jì)程序時(shí)，窗體是程序員的“工作臺(tái)”，而在運(yùn)行程序時(shí)，每個(gè)窗體對(duì)應(yīng)于一個(gè)窗口。窗體是所有控件的“容器”：各種控件對(duì)象必須建立在窗體上，一個(gè)窗體對(duì)應(yīng)一個(gè)窗體模塊。3.1窗體上一頁下一頁返回本章首頁1、Name屬性：窗體名稱

窗體名稱在程序代碼中作為窗體對(duì)象的標(biāo)識(shí)名。在運(yùn)行時(shí)是只讀的。

窗體名稱的默認(rèn)值是（Form1），也可以自定義（建議用前綴：frm）。

窗體名稱的命名規(guī)則：

必須以字母或漢字開頭，不能多于40個(gè)字符，可以包含數(shù)字、字母和下劃線，但不能包含空格或標(biāo)點(diǎn)符號(hào)。注意：

Name屬性運(yùn)行時(shí)只讀。上一頁下一頁返回本章首頁2．Caption屬性：窗體標(biāo)題窗體標(biāo)題是出現(xiàn)在窗體標(biāo)題欄的文本內(nèi)容。窗體標(biāo)題默認(rèn)與窗體名稱相同（Form1）。標(biāo)題也可以自定義，只要是字符串即可，不受其他約束。

如：form1.caption=“歡迎”

me.caption=“歡迎”caption=“歡迎”注意：窗體名稱與窗體標(biāo)題的區(qū)別。上一頁下一頁返回本章首頁3．Visible屬性：窗體的可見性Visible屬性：表明窗體是否可見。它的取值為邏輯值：True（默認(rèn)）或False4.Enabled屬性：窗體的可用性Enabled屬性：決定窗體能否被訪問。它的取值為邏輯值：True或False

True——窗口可操作（默認(rèn)）False——窗口不能操作注意：

Enabled屬性為False時(shí)，通過程序仍可操作它。上一頁下一頁返回本章首頁5.Icon屬性：最小化圖標(biāo)Icon屬性：設(shè)置位于窗體左上角控制按鈕上的圖標(biāo)，當(dāng)窗體最小化為任務(wù)欄上的按鈕時(shí)，也使用此圖標(biāo)。（.ico）程序編譯后也使用此圖標(biāo)。6.ControlBox

屬性：控制框

ControlBox屬性的值為邏輯值。

False——標(biāo)題欄只顯示標(biāo)題文字，不顯示控制按鈕、最大化、最小化、關(guān)閉按鈕。

True——（默認(rèn)）正常。

MaxButton屬性、Minbutton屬性：最大、最小化按鈕WhatsThisButton

幫助按鈕

說明：二者均為False時(shí)按鈕消失，幫助按鈕才出現(xiàn)。注意：此屬性運(yùn)行時(shí)只讀。上一頁下一頁返回本章首頁8.Left、Top、Height、Width屬性：Left、Top、Height、Width屬性用來設(shè)置窗體的位置與大小。

單位為緹（Twip）。Twip（緹）是一種與屏幕分辨率無關(guān)的一種計(jì)量單位。1英寸=1440Twip（緹）1緹=1/567cm說明：在VB中，twip是默認(rèn)單位。ScaleHeight和ScaleWidth用來決定窗體的凈高度和凈寬度；Top屬性決定窗體到屏幕頂端的距離；Left屬性決定了窗體到屏幕左邊緣的距離。上一頁下一頁返回本章首頁9.BackColor與ForeColor屬性：

BackColor與ForeColor：設(shè)置窗體的背景色與前景色。

顏色值用一個(gè)長整數(shù)表示。點(diǎn)擊屬性欄右邊的▲，會(huì)彈出一個(gè)顏色設(shè)置組合框?；蚴褂谩耙晥D”菜單中的“調(diào)色板”命令也可以設(shè)置窗體等對(duì)象的前景色和背景色。上一頁下一頁返回本章首頁11.WindowState

屬性：窗口狀態(tài)WindowState屬性決定窗體的當(dāng)前狀態(tài)是還原、最小化還是最大化。用數(shù)值0~2來表明窗體的狀態(tài)：（vbNormal）------0——正常（默認(rèn)）

（vbMinimized）--1——最小化

（vbMaximized）--2——最大化Picture屬性：背景圖片Picture屬性可以為窗體指定一幅背景圖像?？梢栽凇皩傩源翱凇敝屑虞d圖片，也可在運(yùn)行時(shí)用LoadPicture函數(shù)來動(dòng)態(tài)設(shè)置該屬性。動(dòng)態(tài)加載圖片見例題1：li3_1.vbp上一頁下一頁返回本章首頁2.

窗體的常用事件事件：是指對(duì)象能夠識(shí)別并做出反應(yīng)的外部刺激

這些刺激可能來自用戶的操作、也可能來自于程序自身發(fā)出的消息、也可能來自于操作系統(tǒng)

每一類對(duì)象能支持哪些事件，系統(tǒng)都已預(yù)置好了。要讓某個(gè)事件做出反應(yīng)，就必須編寫這個(gè)事件對(duì)應(yīng)的“事件過程”事件過程：是一個(gè)相對(duì)獨(dú)立的程序段，是應(yīng)用程序代碼的重要組成部分。上一頁下一頁返回本章首頁事件過程的語法格式在VisualBasic中，事件過程的語法格式是：

PrivateSub對(duì)象名_事件名（參數(shù)）……‘VB語句

EndSub窗體常用的事件有：

Click：單擊窗體時(shí)發(fā)生

DblClick：雙擊窗體時(shí)發(fā)生

Load：當(dāng)窗體被加載到內(nèi)存中準(zhǔn)備顯示時(shí)發(fā)生

Resize：當(dāng)窗口第一次顯示或窗口大小改變時(shí)該事件發(fā)生

MouseMove、MouseDown、MouseUp上一頁下一頁返回本章首頁3.

窗體的常用方法VB中的“方法”：是指對(duì)象具有的行為和能執(zhí)行的動(dòng)作。在程序中引用方法的格式如下：

對(duì)象名.方法名或：對(duì)象名.方法名[參數(shù)1，參數(shù)2···]窗體可調(diào)用多個(gè)方法。常用的方法有：

Move：把窗體移到某個(gè)位置

Hide：隱藏窗體

Show：顯示窗體

Print：在窗體上顯示文本或數(shù)據(jù)例：在窗體上顯示“大家好”，在程序中加入代碼：

Form1.Print“大家好”

上一頁下一頁返回本章首頁Move方法格式：對(duì)象名.Moveleft,[top,[width,[height]

]

]作用：將對(duì)象移至left,top（窗體左上角的坐標(biāo)，單位為

twip）指定的新位置。例：在程序代碼中增加下列內(nèi)容：form1.Move1000,1000,8000,6000

form1.Move1000,,,8000‘錯(cuò)誤Cls方法格式：對(duì)象名.Cls

作用：

用來清除運(yùn)行時(shí)窗體或圖片框所生成的圖形和文本。上一頁下一頁返回本章首頁Hide方法格式：對(duì)象名.Hide作用：將指示的窗體隱藏，但不卸載。例：單擊“隱藏”按鈕，將隱藏窗體：

form1.HideShow方法格式：對(duì)象名.Show作用：用來顯示指定窗體。例：單擊“顯示”按鈕，將顯示窗體：

form1.Show上一頁下一頁返回本章首頁3.2命令按鈕命令按鈕（CommandButton）用來在窗體內(nèi)添加命令按鈕。運(yùn)行時(shí)用戶單擊此按鈕，則執(zhí)行一段程序代碼。1.命令按鈕的常用屬性除與窗體共同的一些屬性外，還有幾個(gè)重要屬性：Style：按鈕外觀（0----字符/

1----圖形）Cancel：取消按鈕（Esc）------TrueDefault：默認(rèn)按鈕（Enter）----True注意：按鈕上熱鍵的設(shè)置上一頁下一頁返回本章首頁Value：取值屬性（若按鈕被選中，則Value=

True，觸發(fā)Click事件)，其默認(rèn)值為False。Picture：按鈕上可顯示圖片(.BMP、.ICO)，只有當(dāng)Style=1時(shí)有效。ToolTipText：工具小提示（文本）2.命令按鈕的Move方法其意義與窗體的Move方法相同3.命令按鈕的Click事件

Move方法與Click事件舉例，見例題3：li3_3.vbp

注意：

按鈕不支持雙擊事件上一頁下一頁返回本章首頁3.3文本框（TextBox）文本框：用于接收用戶在框內(nèi)輸入的信息(如姓名、地址、密碼等),或顯示由程序提供的信息。(單行最多輸入2048個(gè)字符；多行時(shí)可輸入多達(dá)32KB的文本)1.文本框的常用屬性

Text—框中顯示的文本

PasswordChar——顯示密碼（通常為*，

MultiLine為False時(shí)有效）

MaxLength——可輸入字符的最大長度

*MultiLine——文本框中可輸入多行文本

*ScrollBars——滾動(dòng)條（MultiLine為True時(shí)有效）

*Alignment——文本的對(duì)齊方式

Locked——文本框中的內(nèi)容是否被鎖定

說明：帶*者為運(yùn)行時(shí)只讀上一頁下一頁返回本章首頁3.4標(biāo)簽（label）標(biāo)簽常用來標(biāo)注本身不具有Caption屬性的控件，也可用它們?yōu)榇绑w添加說明文字(最長1024字節(jié)）。1.標(biāo)簽的常用屬性見例題7：Li3_7.vbp

Font,Name,Caption,Alignment屬性同窗體。

AutoSize——自動(dòng)縮放，即大小自適應(yīng)屬性。默認(rèn)為False，若為True，根據(jù)文本自動(dòng)調(diào)整標(biāo)簽寬度。WordWrap——False時(shí)：內(nèi)容增加時(shí)，文字換行；True時(shí)：內(nèi)容增加時(shí)，文字不換行；BackStyle—背景是否透明（0—透明，1—不透明）BorderStyle—邊框樣式（0—無邊框，1—有邊框）上一頁下一頁返回本章首頁2.標(biāo)簽的Move方法

3.標(biāo)簽的常用事件

Click：單擊鼠標(biāo)左鍵時(shí)觸發(fā)。DbClick：雙擊鼠標(biāo)左鍵時(shí)觸發(fā)。

Change：標(biāo)簽上顯示的內(nèi)容發(fā)生改變時(shí)觸發(fā)。上機(jī)實(shí)訓(xùn):

實(shí)訓(xùn)四幾個(gè)簡單控件的應(yīng)用

上一頁下一頁返回本章首頁。賦值語句又稱為Let語句，其作用是把指定的值賦給某個(gè)變量或某個(gè)帶有對(duì)象的屬性。一般格式為：

[Let]變量名=表達(dá)式

[Let][對(duì)象名.]屬性名=表達(dá)式說明：（1）“=”為賦值號(hào)，不同于數(shù)學(xué)意義上的等號(hào)。（2）賦值語句具有賦值和計(jì)算的雙重功能，即首先計(jì)算賦值號(hào)右邊的表達(dá)式的值，然后賦給左邊的變量。（3）變量和表達(dá)式應(yīng)具有相同的數(shù)據(jù)類型。但不管表達(dá)式是什么類型，都可以賦給一個(gè)Variant變量。如：x=x+1

Text1.Text=“您好！”上一頁下一頁返回本章首頁3.6Print方法Print方法的語法格式為：

對(duì)象名.Print{Spc(n)|Tab(n)}[<表達(dá)式列表>][,|;]Print方法的功能為：在對(duì)象名上輸出表達(dá)式的值說明：

①對(duì)象名可以是窗體（Form）、立即窗口（Debug）

、圖片框（Picture）

、打印機(jī)（Printer）等對(duì)象名。

②[<表達(dá)式列表>]是一個(gè)或多個(gè)表達(dá)式，中間用

[,|;]分隔，省略表示輸出一空行。用

[，]分隔表示按標(biāo)準(zhǔn)格式輸出，用

[；]分隔表示按緊湊格式輸出。末尾有

[,|;]表示下一個(gè)輸出不換行。如：Print1;2;3:Print4,5,:Print6上一頁下一頁返回本章首頁3.6Print方法③Tab函數(shù)

格式：Tab(n)功能：對(duì)輸出進(jìn)行定位(應(yīng)與Print方法一起使用)注意：當(dāng)在一個(gè)Print方法中有多個(gè)Tab函數(shù)時(shí)，每個(gè)Tab函數(shù)對(duì)應(yīng)一個(gè)輸出項(xiàng)，各輸出項(xiàng)之間用分號(hào)隔開。例8：Print方法與Tab函數(shù)應(yīng)用，見Li3_8.vbp

PrivateSubForm_Click()Print"123456789"PrintTab(5);“5”;Tab(10-2);“8”,“‘注意這里10-2>當(dāng)前位置5，故同行顯示"

PrintTab(5);"5";Tab(10-6);"4";Tab(20-15);"5";

“‘注意這里10-6<當(dāng)前位置5，故換行顯示；20-15>當(dāng)前位置4，故同行顯示"

EndSub3.6Print方法④Spc函數(shù)

格式：Spc(n)功能：在顯示或打印列表中的下一個(gè)表達(dá)式之前插入n個(gè)空格數(shù)，n為0~32767之間的整數(shù)。說明：Spc函數(shù)與輸出項(xiàng)之間用分號(hào)隔開。

⑤使用位置屬性

位置屬性CurrentX和CurrentY常用來把文本精確地輸出到窗體、圖片框或打印頁上。這兩個(gè)屬性分別表示當(dāng)前輸出位置的橫坐標(biāo)與縱坐標(biāo)。

格式：[對(duì)象名稱].CurrentX[=x][對(duì)象名稱].CurrentY[=y]例9：將圖片框相對(duì)于窗體居中顯示，圖片框中的文字居中顯示。

Li3_9.vbp上一頁下一頁返回本章首頁3.6Print方法Cls方法

格式：[對(duì)象名.]Cls

功能：清除Print方法顯示的文本或在圖片框中顯示的圖形。說明：[對(duì)象名.]只能是窗體或圖片框上一頁下一頁返回本章首頁3.7輸入框

InputBox函數(shù)用來提示用戶輸入一個(gè)字符串。格式：InputBox(提示字符串[,標(biāo)題字符串][,文本框缺省字符串][,xpos][,ypos])作用：在一對(duì)話框中顯示提示，等待用戶輸入正文或按下按鈕，并返回包含文本框中內(nèi)容，函數(shù)值的類型為String類型。說明：提示字符串

的最大長度是1024個(gè)字符。若想包含多個(gè)行，則可在各行之間用回車換行符的組合Chr(13)&Chr(10)（或VbCrLf）來分隔。標(biāo)題字符串若省略，則把應(yīng)用程序名放入標(biāo)題欄中。

文本框缺省字符串若省略，則文本框?yàn)榭?。上一頁下一頁返回本章首頁輸入框舉例例題10：輸入框應(yīng)用舉例li3_10.vbp

上一頁下一頁返回本章首頁3.8消息框MsgBox函數(shù)---可以在屏幕上彈出一個(gè)消息框作用：在對(duì)話框中顯示信息，等待用戶單擊按鈕，并返回一個(gè)整數(shù)以標(biāo)明用戶單擊了哪個(gè)按鈕。格式：變量=MsgBox（<提示>[,<按鈕>][,<標(biāo)題>]）MsgBox語句格式為：

MsgBox<提示>[,<按鈕>][,<標(biāo)題>]

其中：<提示>、<標(biāo)題>的意義同InputBox函數(shù)。

<按鈕>可選項(xiàng)是一個(gè)整型表達(dá)式，指定顯示按鈕的數(shù)目及形式，使用的圖標(biāo)類型，缺省按鈕的種類以及消息框的強(qiáng)制回應(yīng)等。如果省略，則<按鈕>的缺省值為0。見P41-42.例題11：消息框應(yīng)用舉例li3_11.vbp上一頁下一頁返回本章首頁3.9注釋語句與結(jié)束語句1、注釋語句

注釋就是在程序中添加的文字說明。

注釋語句是非執(zhí)行語句。注釋語句的格式是：（1）Rem語句，一般形式為：Rem<注釋>（2）單引號(hào)，一般形式為：′<注釋>

使用單引號(hào)更加靈活、方便，它可以給一個(gè)代碼行添加注釋。2、結(jié)束語句

結(jié)束語句用來結(jié)束程序的執(zhí)行，并關(guān)閉已打開的文件。格式：End上一頁下一頁返回本章首頁3.10程序調(diào)試1、程序錯(cuò)誤編譯錯(cuò)誤在編譯過程中出現(xiàn)的錯(cuò)誤。如：Prinnt