第-章-簡(jiǎn)單的Visual-Basic程序設(shè)計(jì)優(yōu)秀文檔

第2章簡(jiǎn)單的VisualBasic程序設(shè)計(jì)2.1程序設(shè)計(jì)的概念機(jī)器語(yǔ)言(MachineLanguages)由0/1組成的機(jī)器指令的集合，它可以被直接接收?qǐng)?zhí)行。匯編語(yǔ)言(AssemblyLanguages)用助記符、符號(hào)地址、標(biāo)號(hào)等符號(hào)編寫的程序。高級(jí)語(yǔ)言(High-levelProceduralLanguages)編譯：

將高級(jí)語(yǔ)言源程序翻譯成目標(biāo)程序的過(guò)程。(Compiler)高級(jí)語(yǔ)言源程序機(jī)器語(yǔ)言目標(biāo)程序可執(zhí)行程序編譯程序連接程序編譯連接語(yǔ)言處理程序匯編：

將匯編語(yǔ)言源程序翻譯成目標(biāo)程序的過(guò)程。解釋：將高級(jí)語(yǔ)言源程序翻譯和執(zhí)行的過(guò)程。

(Interpreter)高級(jí)語(yǔ)言源程序結(jié)果解釋程序解釋并執(zhí)行語(yǔ)言處理程序2.2VB中的對(duì)象對(duì)象：具有特殊屬性(數(shù)據(jù))和行為方式(方法)的實(shí)體，它由屬性、事件和方法構(gòu)成。對(duì)象的分類：預(yù)定義對(duì)象/自定義對(duì)象常用的預(yù)定義對(duì)象：窗體、控件（工具箱窗口中）自定義對(duì)象：VB高級(jí)應(yīng)用對(duì)象的三要素屬性(property)對(duì)象的性質(zhì)，即用來(lái)描述和反映對(duì)象特征的參數(shù)。方法(method)對(duì)象的行為，用來(lái)描述對(duì)象的動(dòng)作的術(shù)語(yǔ)，實(shí)質(zhì)上是VB提供的完成一定操作或功能的子程序或函數(shù)。事件(event)系統(tǒng)事先設(shè)定的能被對(duì)象識(shí)別和響應(yīng)的動(dòng)作。鼠標(biāo)事件：?jiǎn)螕艨丶–lick）鼠標(biāo)移動(dòng)等鍵盤事件：鍵盤按下（Keypress）等VB編程要點(diǎn)（學(xué)習(xí)的重點(diǎn)）：對(duì)象屬性、事件、方法的設(shè)置及其使用2.2.2對(duì)象的名稱每一個(gè)對(duì)象都有自己的名字。每個(gè)窗體、控件對(duì)象在建立時(shí)VB系統(tǒng)給出了一個(gè)默認(rèn)名。用戶可通過(guò)屬性窗口設(shè)置（name）來(lái)給對(duì)象命名。使用對(duì)象名稱的方式是：

對(duì)象名2.2.3對(duì)象的屬性對(duì)象屬性設(shè)置的方法：方法一：

在設(shè)計(jì)模式下，通過(guò)屬性窗口直接設(shè)置對(duì)象的屬性。方法二：在程序的代碼中通過(guò)賦值實(shí)現(xiàn)，其格式為：對(duì)象名.屬性名稱=新設(shè)置屬性值例如：Weltxt.Text=“Hello,歡迎進(jìn)入VisualBasic世界！”2.2.4對(duì)象的事件事件：是由VisualBasic預(yù)先設(shè)置好的、能夠被對(duì)象識(shí)別的動(dòng)作。事件過(guò)程：是指附在該對(duì)象上的程序代碼，是事件觸發(fā)后處理的程序。事件過(guò)程的形式如下：PrivateSub對(duì)象名稱_事件名稱（）…..事件響應(yīng)程序代碼EndSub補(bǔ)充：常用事件Click（單擊）事件：?jiǎn)螕羰髽?biāo)左鍵時(shí)觸發(fā)DbClick（雙擊）事件：雙擊鼠標(biāo)時(shí)觸發(fā)Load（裝入）事件：窗體被裝入工作區(qū)時(shí)觸發(fā)設(shè)置事件及事件過(guò)程的方法在代碼窗口選中對(duì)象后，選中相應(yīng)事件，再編寫事件響應(yīng)程序代碼直接雙擊對(duì)象后，編寫事件響應(yīng)程序代碼添加事件關(guān)鍵：選對(duì)“事件對(duì)象”和“事件類型”2.2.4對(duì)象的方法方法是對(duì)象能執(zhí)行的動(dòng)作或功能，如移動(dòng)、繪圖、打開等。使用對(duì)象的方法的格式如下：對(duì)象名.方法名[參數(shù)列表]例如：Command1.Move200,300補(bǔ)充：常用方法Print方法(適用于窗體及圖片框)（見(jiàn)教材P72頁(yè)）Show/Hide(適用于窗體)（見(jiàn)教材P204頁(yè)）Cls方法(適用于窗體)（見(jiàn)教材P75頁(yè)）Move方法(適用于各種控件)2.3.1VB應(yīng)用程序的組成窗體模塊(*.frm) 窗體文件中含有兩方面的信息：一是窗體及控件的屬性；二是窗體中編寫的代碼。標(biāo)準(zhǔn)模塊(*.bas)類模塊(*.cls)簡(jiǎn)單程序只有窗體模塊2.3.2VB應(yīng)用程序的工作方式VB應(yīng)用程序采用的是以事件驅(qū)動(dòng)應(yīng)用程序的工作方式。典型的VB應(yīng)用程序的執(zhí)行步驟：1.啟動(dòng)應(yīng)用程序，加載和顯示窗體；2.窗體或窗體上的控件等待接收事件；3.如果相應(yīng)的事件過(guò)程中存在代碼，則執(zhí)行該代碼；4.等待下次事件。2.4VB開發(fā)應(yīng)用程序一般步驟1.繪制界面插入對(duì)象，在窗體設(shè)計(jì)窗口利用工具箱窗口完成2.設(shè)置屬性設(shè)置對(duì)象屬性，在屬性窗口完成3.編寫代碼填寫代碼，在代碼窗口完成知識(shí)點(diǎn)一：控件的使用教材P31頁(yè)

控件的繪制：方法一：?jiǎn)螕艄ぞ呦淇丶?duì)象 在窗體上按住左鍵拖曳到所需要的大小后釋放。方法二：雙擊工具箱控件對(duì)象 則立即在窗體出一個(gè)默認(rèn)大小的對(duì)象框。知識(shí)點(diǎn)一：關(guān)于控件教材P31頁(yè)控件的選擇：

單個(gè)對(duì)象：?jiǎn)螕羰髽?biāo)左鍵

多個(gè)對(duì)象：Shift或者鼠標(biāo)選擇復(fù)制:Ctrl+C,Ctrl+V注意：一般不要生成屬性組。刪除:Del

知識(shí)點(diǎn)一：關(guān)于控件教材P31頁(yè)縮放和移動(dòng)

鼠標(biāo)拖曳修改屬性值（Width，Height，Top，Left）對(duì)齊與調(diào)整

“格式”|”對(duì)齊“

2.4VB開發(fā)應(yīng)用程序一般步驟1.繪制界面插入對(duì)象，在窗體設(shè)計(jì)窗口利用工具箱窗口完成2.設(shè)置屬性設(shè)置對(duì)象屬性，在屬性窗口完成3.編寫代碼填寫代碼，在代碼窗口完成知識(shí)點(diǎn)二:關(guān)于屬性方法一：

在設(shè)計(jì)模式下，通過(guò)屬性窗口直接設(shè)置對(duì)象的屬性。方法二：在程序的代碼中通過(guò)賦值實(shí)現(xiàn)，其格式為：對(duì)象名.屬性名稱=新設(shè)置屬性值例如：TxtWel.Text=“Hello,歡迎進(jìn)入VisualBasic世界！”對(duì)象屬性設(shè)置的方法：對(duì)象的基本屬性1.Name名稱屬性（任何對(duì)象都具有的）創(chuàng)建的對(duì)象名稱,有默認(rèn)的名稱。在程序中，對(duì)象名是作為對(duì)象的標(biāo)識(shí)而引用，不會(huì)顯示在窗體上。2.Caption標(biāo)題屬性

設(shè)置控件標(biāo)題欄上顯示的內(nèi)容。顯示在對(duì)象上對(duì)象的命名

（設(shè)置控件的Name屬性）命名約定：

1）必須由字母或漢字開頭、隨后可以是字母、漢字、數(shù)字、下劃線（最好不用）組成。2）長(zhǎng)度<=255個(gè)字符。對(duì)象命名的慣例：匈牙利命名法教材P35頁(yè)前綴（表示控件的類型）+單詞（控件代表的意義）)例：cmdSayHellotxtOklblOk幾種常用對(duì)象的前綴按鈕CommandButtoncmd標(biāo)簽Labellbl文本框TextBoxtxt圖片框PictureBoxpic圖象框Imageimg2.4VB開發(fā)應(yīng)用程序一般步驟1.繪制界面插入對(duì)象，在窗體設(shè)計(jì)窗口利用工具箱窗口完成2.設(shè)置屬性設(shè)置對(duì)象屬性，在屬性窗口完成3.編寫代碼填寫代碼，在代碼窗口完成知識(shí)點(diǎn)三：關(guān)于代碼編寫進(jìn)入程序代碼窗口的四種方法：

雙擊窗體或已建立好的控件。執(zhí)行“視圖”菜單中的“代碼窗口”命令。單擊工程資源管理器窗口中的“查看代碼”按鈕?？旖萱IF7教材P30頁(yè)知識(shí)點(diǎn)三：關(guān)于代碼編寫編寫代碼技巧：先分析事件（用戶動(dòng)作，譯成VB語(yǔ)言）添加事件過(guò)程（應(yīng)用程序的相應(yīng)反映，對(duì)象屬性變化等）先用自己的語(yǔ)言描述，再通過(guò)代碼實(shí)現(xiàn)對(duì)象名.Show、Hide方法（見(jiàn)教材P204頁(yè)）熟悉編寫VB程序的一般步驟False：呈暗淡色，禁止用戶進(jìn)行操作。文本框(TextBox)的屬性(Interpreter)ico)，只有當(dāng)Style屬性值為1時(shí)有效窗體（Form）的方法保存工程教材P36頁(yè)Visible屬性：決定控件是否可見(jiàn)FontUnderLine屬性：正文是否帶下劃線。FontUnderLine屬性：正文是否帶下劃線。方法二：雙擊工具箱控件對(duì)象設(shè)置對(duì)象屬性，在屬性窗口完成注意識(shí)別“事件對(duì)象”和“事件類型”BackStyle背景樣式知識(shí)點(diǎn)四：關(guān)于保存程序

保存工程

教材P36頁(yè)“文件”|“保存工程”工具欄中的“保存”按鈕“文件|Form1另存為”

“文件|工程另存為”

按鈕CommandButtoncmd創(chuàng)建的對(duì)象名稱,有默認(rèn)的名稱。(2)AutoSize屬性:是否自動(dòng)改變大小以顯示內(nèi)容True：標(biāo)簽在垂直方向上隨文本變化。常見(jiàn)控件:文本框(TextBox), 標(biāo)簽(Label),Picture:按鈕可顯示圖片文件(.命令按鈕(CommandBotton)的屬性,常見(jiàn)事件和方法PrivateSub對(duì)象名稱_事件名稱（）ControlBox屬性：設(shè)置窗口控制框的狀態(tài)PrivateSubForm_Click()FontBold屬性：正文是否是粗體。Top、left屬性：設(shè)置窗體位置作用:用于顯示文本(輸出)信息，不能輸入信息。1:（缺省值）非透明Caption="鼠標(biāo)單擊"匯編語(yǔ)言(AssemblyLanguages)4VB開發(fā)應(yīng)用程序一般步驟保存提示:1.VB應(yīng)用程序至少有兩種文件需要保存：工程文件.vbp（通常1個(gè)工程文件對(duì)應(yīng)1個(gè)應(yīng)用程序）窗體文件.frm（通常1個(gè)工程文件包含至少1個(gè)窗體文件）

保存這兩個(gè)文件時(shí),一定要先保存窗體文件(.frm),再保存工程文件(.vbp).否則下次打開工程會(huì)出錯(cuò).保存提示:2.每一個(gè)程序都要單獨(dú)建一個(gè)工程，并放在單獨(dú)的文件夾中3.下次編輯打開這個(gè)程序，雙擊.vbp文件知識(shí)點(diǎn)五：運(yùn)行應(yīng)用程序運(yùn)行調(diào)試工程

教材P37頁(yè)

（1）選擇“運(yùn)行”菜單中的“啟動(dòng)”。 （2）單擊工具欄中的“啟動(dòng)”按鈕。 （3）按[F5]鍵。

知識(shí)點(diǎn)六：

生成EXE文件生成EXE文件

教材P37頁(yè)

“文件”|”生成工程.exe”

exe是交給最終用戶的，編程者不需要它知識(shí)點(diǎn)七:VB三種狀態(tài)教材P259頁(yè)設(shè)計(jì)狀態(tài)(design)進(jìn)行程序的界面設(shè)計(jì)、屬性設(shè)置、代碼編寫等。運(yùn)行狀態(tài)(run)執(zhí)行“運(yùn)行/啟動(dòng)”命令，查看程序運(yùn)行效果,也可以查看程序代碼，但不能修改。中斷狀態(tài)(break)當(dāng)在運(yùn)行模式，按了“中斷”命令或當(dāng)程序出現(xiàn)運(yùn)行時(shí)錯(cuò)誤時(shí)進(jìn)入中斷模式?？梢圆榭创a、修改代碼、檢查數(shù)據(jù)。補(bǔ)充：窗體與控件控件與窗體是VB程序中兩種常用對(duì)象。窗體(Form)的屬性,方法和事件常見(jiàn)控件:文本框(TextBox),

標(biāo)簽(Label),命令按鈕(CommandBotton)的屬性,常見(jiàn)事件和方法窗體屬性決定了窗體的外觀與操作。一、窗體（Form）教材P198頁(yè)窗體（Form）的屬性Name屬性：名稱用于標(biāo)識(shí)窗體對(duì)象的名字,默認(rèn)名Form1。例如：frmMainfrmInputWindow[窗體]Name屬性窗體設(shè)計(jì)窗口窗體名窗體文件名Caption屬性：窗體標(biāo)題決定出現(xiàn)在窗體的標(biāo)題欄上的文本內(nèi)容，也是當(dāng)窗體被最小化后出現(xiàn)在窗體圖標(biāo)下的文本。窗體（Form）的屬性Height、width屬性：設(shè)置窗體大小Top、left屬性：設(shè)置窗體位置窗體（Form）的屬性Left:窗體左邊與桌面左邊的距離。Top:窗體頂部和桌面頂邊的距離。提示：高寬左右的單位為twip（緹）Height:窗體的高度Width:窗體的寬度包括邊框和標(biāo)題欄

FontName屬性：正文的字體（缺省為宋體）。

FontSize屬性：正文的字體大小。

FontBold屬性：正文是否是粗體。

FontItalic屬性：正文是否是斜體。

FontStrikeThru屬性：正文是否加一刪除線。

FontUnderLine屬性：正文是否帶下劃線。窗體（Form）的屬性Font屬性組：設(shè)置窗體上顯示字體Enabled屬性（邏輯值）：決定控件是否可操作。

True：允許用戶進(jìn)行操作，并對(duì)操作出響應(yīng)（缺省值）。

False：呈暗淡色，禁止用戶進(jìn)行操作。Visible屬性：決定控件是否可見(jiàn)

True：運(yùn)行時(shí)控件可見(jiàn)（缺省值）。

False：運(yùn)行時(shí)控件隱藏，用戶看不到，但控件本身是存在的。窗體（Form）的屬性BackColor屬性：設(shè)置窗體的背景顏色ForeColor屬性：定義在窗體里顯示圖片和文本的前景顏色例如，窗體Form1的背景色設(shè)為紅色：

Form1.BackColor=RGB(255,0,0)Form1.BackColor=vbRed窗體（Form）的屬性MaxButton和MinButton屬性：

True：有最大或最小化按鈕

False：則無(wú)。ControlBox屬性：設(shè)置窗口控制框的狀態(tài)

True：窗體左上角有控件菜單

False：無(wú)控件菜單，同時(shí)窗體也無(wú)最大化按鈕和最小化按鈕。窗體（Form）的屬性Picture屬性：設(shè)置窗體中要顯示的圖片。窗體（Form）的屬性Form1.Picture=LoadPicture(App.Path+"\tu.jpg")Form1.Picture=LoadPicture("D:\引例2-1\tu.jpg")在窗體中設(shè)置顯示圖片的方法:在屬性窗口中設(shè)置Form的Picture屬性在代碼中利用LoadPicture函數(shù)提示:表示裝入的圖片文件與應(yīng)用程序在同一文件夾文本框(TextBox)的屬性按鈕CommandButtoncmdForm1.MaxButton和MinButton屬性：窗體（Form）的屬性填寫代碼，在代碼窗口完成PrivateSubForm_Click()設(shè)置對(duì)象屬性，在屬性窗口完成Enabled屬性（邏輯值）：決定控件是否可操作。Default：確認(rèn)屬性（邏輯值），設(shè)置為True時(shí)，按Enter鍵相當(dāng)于用鼠標(biāo)器單擊了該按鈕。前綴（表示控件的類型）+單詞（控件代表的意義）)Print"結(jié)束使用VB"Form1.0：Normal：正常窗口狀態(tài)，有窗口邊界；1：最小化狀態(tài)，以圖標(biāo)方式運(yùn)行；2：最大化狀態(tài)，無(wú)邊框，充滿整個(gè)屏幕。 窗體（Form）的屬性

WindowsState屬性：?jiǎn)?dòng)時(shí)窗口狀態(tài)

BorderStyle屬性：邊框風(fēng)格窗體（Form）的常用事件 Click（單擊）事件：?jiǎn)螕羰髽?biāo)左鍵時(shí)觸發(fā)DbClick（雙擊）事件：雙擊窗體時(shí)觸發(fā)Load（裝入）事件：窗體被裝入工作區(qū)時(shí)觸發(fā)上述屬性、Click、DblClick和Load事件演示。注意識(shí)別“事件對(duì)象”和“事件類型”PrivateSubForm_Load()Caption="裝入窗體"Picture=LoadPicture(App.Path+"\window.jpg")FontSize=48FontName="隸書"Print"裝入窗體"EndSubPrivateSubForm_Click()Caption="鼠標(biāo)單擊"Print"歡迎使用VB"EndSubPrivateSubForm_DblClick()Caption="鼠標(biāo)雙擊"Picture=LoadPicture("")Print"結(jié)束使用VB"EndSubPrint方法Move方法Cls方法（見(jiàn)教材P186頁(yè)）Show、Hide方法（見(jiàn)教材P204頁(yè)）

窗體（Form）的方法Print方法：打印作用:在窗體對(duì)象上輸出信息（文字）

形式:[對(duì)象.]Print參數(shù)窗體（Form）的方法Print“輸出信息XXXX“

輸出字符串PrintX

輸出變量值Cls方法：清除作用:清除運(yùn)行時(shí)在窗體顯示的文本或圖形。形式:[對(duì)象名.]Cls窗體（Form）的方法例如:Move方法：移動(dòng)作用:移動(dòng)窗體或控件，并可改變其大小。形式:[對(duì)象名.]Move參數(shù)窗體（Form）的方法2000image1.left+100例如:在窗體上的Command1和Command2的單擊事件中寫入如下代碼：PrivateSubCommand1_Click()Print“歡迎進(jìn)入Vb世界"Print"a=";a,"b=";bPrint‘空一行Print"a=";a,"b=";bEndSubPrivateSubCommand2_Click()EndSubShow方法：顯示作用：用于在屏幕上窗體。Hide方法：隱藏Hide方法用于使指定的窗體不顯示，但不從內(nèi)存中刪除窗體。窗體（Form）的方法例：實(shí)現(xiàn)將指定的窗體在屏幕上進(jìn)行顯示或隱藏的切換。在窗體Form1的單擊事件中寫入如下代碼：PrivateSubForm_Click()Form1.Hide'隱藏窗體MsgBox"單擊按鈕，使窗體重現(xiàn)屏幕"'顯示信息Forml.Show'重現(xiàn)窗體EndSub二、文本框(TextBox)功能:文本編輯區(qū)域，在該區(qū)域輸入，編輯和顯示文本。

注意:文本框沒(méi)有Caption屬性常用屬性:

Text文本屬性:設(shè)置文本框中顯示的內(nèi)容。name屬性：設(shè)置文本框名稱Height、Width屬性:設(shè)置文本框大小Top、Left屬性:設(shè)置文本框位置BackColor屬性：設(shè)置文本框的背景顏色ForeColor屬性：設(shè)置在文本框中顯示文本的前景顏色文本框(TextBox)的屬性

FontName屬性：正文的字體（缺省為宋體）。

FontSize屬性：正文的字體大小。

FontBold屬性：正文是否是粗體。

FontItalic屬性：正文是否是斜體。

FontStrikeThru屬性：正文是否加刪除線。

FontUnderLine屬性：正文是否帶下劃線。文本框(TextBox)的屬性

Font屬性組：設(shè)置在文本框中顯示內(nèi)容的字體Enabled屬性（邏輯值）：決定控件是否可操作。

True：允許用戶進(jìn)行操作。

False：呈暗淡色，禁止用戶進(jìn)行操作。Visible屬性：決定控件是否可見(jiàn)

True：運(yùn)行時(shí)控件可見(jiàn)（缺省值）。

False：運(yùn)行時(shí)控件隱藏，用戶看不到，但控件本身是存在的。文本框(TextBox)的屬性BackColor屬性：設(shè)置文本框的背景顏色ForeColor屬性：定義在文本框中顯示文本的前景顏色例如，文本框Text1的背景色設(shè)為紅色：

Text1.BackColor=RGB(255,0,0)Text1.BackColor=vbRed文本框(TextBox)的屬性MultiLine：設(shè)置文本顯示內(nèi)容是否為多行,默認(rèn)一行.

True:文本顯示內(nèi)容為多行

False:文本顯示內(nèi)容為一行PasswordChar:

掩蓋文本框中輸入的字符。該屬性的設(shè)置只有在MultiLine設(shè)為

False才有效文本框(TextBox)的屬性文本框(TextBox)常用事件文本框支持Click，DblClick等鼠標(biāo)事件，同時(shí)還支持Change，KeyPress，LostFocus，GetFocus等事件三、標(biāo)簽（Label）作用:用于顯示文本(輸出)信息，不能輸入信息?；緦傩訬ame、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等。

常用屬性（1）Caption屬性Caption屬性用來(lái)設(shè)置Label控件中顯示的文本。(2)AutoSize屬性:是否自動(dòng)改變大小以顯示內(nèi)容

True:自動(dòng)改變控件大小以顯示全部?jī)?nèi)容。

False:（缺省值）保持控件大小不變。超出控件區(qū)域的內(nèi)容被裁剪掉。標(biāo)簽（Label）的屬性（3）Alignment屬性：設(shè)置文本對(duì)齊方式

0：左對(duì)齊。

1：右對(duì)齊

2：居中（4）WordWrap屬性：標(biāo)簽大小隨文字多少的擴(kuò)展方式

True：標(biāo)簽在垂直方向上隨文本變化。

False：標(biāo)簽在水平方向上隨文本變化。注意:AutoSize為True時(shí)才有效標(biāo)簽（Label）的屬性

（5）

BackStyle屬性：對(duì)象的背景是否透明

0:透明－在控件后的背景色和任何圖片都是可見(jiàn)的。

1:（缺省值）非透明標(biāo)簽（Label）的屬性（6）BorderStyle屬性：設(shè)置對(duì)象的邊框樣式屬性值：

0:(缺省值)無(wú)。

1:固定單邊框。標(biāo)簽（Label）的屬性（7）MousePointer屬性：設(shè)置鼠標(biāo)指針

（8）MouseIcon屬性：設(shè)置鼠標(biāo)圖標(biāo)作用：自定義的鼠標(biāo)圖標(biāo),必須在MousePointer=99時(shí)使用在窗體上放置5個(gè)標(biāo)簽,其名稱使用默認(rèn)值Label1－Label5,它們的高度與寬度相同,按下表設(shè)置它們的屬性。效果四、命令按鈕(CommandButton)作用:命令按鈕用于接受用戶輸入的命令默認(rèn)名稱：Command1、2…常用屬性：Name、Height