VB應(yīng)用程序設(shè)計(jì)過(guò)程(復(fù)習(xí))

1、第第2 2章章 VBVB應(yīng)用程序應(yīng)用程序設(shè)計(jì)過(guò)程設(shè)計(jì)過(guò)程2.1 2.1 面向?qū)ο蟪绦蛟O(shè)計(jì)的基本概念面向?qū)ο蟪绦蛟O(shè)計(jì)的基本概念傳統(tǒng)過(guò)程化應(yīng)用程序從第一行開(kāi)始執(zhí)行,并按照預(yù)定的路徑執(zhí)行,用戶無(wú)法改變程序的流程事件驅(qū)動(dòng)的應(yīng)用程序代碼不是按預(yù)定的路徑執(zhí)行,而是在響應(yīng)不同事件時(shí)執(zhí)行不同的代碼段.事件觸發(fā)由用戶觸發(fā)由操作系統(tǒng)觸發(fā)由其它應(yīng)用程序的消息觸發(fā)采用面向?qū)ο?、事件?qū)動(dòng)方式的編程,程序員不需要考慮精確次序執(zhí)行的每一步驟，而只需編寫(xiě)響應(yīng)用戶動(dòng)作的程序即可，工作量相對(duì)較少。用VB編程，實(shí)際上是與一組標(biāo)準(zhǔn)對(duì)象進(jìn)行交互的過(guò)程。一、對(duì)象與類是系統(tǒng)中的基本運(yùn)行實(shí)體,是代碼和數(shù)據(jù)的集合.對(duì)象：類：類是同種對(duì)象的集合

2、與抽象。 一個(gè)對(duì)象就是類的一個(gè)實(shí)例二、屬性描述對(duì)象特征的數(shù)據(jù)稱為屬性。對(duì)象常見(jiàn)的屬性：標(biāo)題(Caption)名稱(Name)顏色(Color)字體(Font)是否可見(jiàn)(Visible)通過(guò)修改對(duì)象的屬性，可以改變對(duì)象的外觀與功能。 在屬性窗口上設(shè)置 在程序代碼中用賦值語(yǔ)句設(shè)置屬性設(shè)置格式：.=例如:給一個(gè)對(duì)象名為“Command1”的命令按鈕的 “Caption”屬性賦值為“確定”，在程序代碼中實(shí)現(xiàn)的語(yǔ) 句是：Command1. Caption=“確定” 三、事件與事件過(guò)程事件：是指對(duì)象上發(fā)生的事情。 在VB中，系統(tǒng)為每一對(duì)象預(yù)先定義好一系列的事件，如： 單擊(Click) 雙擊(DblCli

3、ck) 裝入事件(Load) 改變事件(Change) 鼠標(biāo)移動(dòng)事件(MouseMove) 獲取焦點(diǎn)事件(GotFocus)事件過(guò)程的一般格式:Private Sub _() （事件過(guò)程代碼）End Sub例:命令按鈕Command1的單擊Click事件，將窗體Form1的背景色設(shè)置為藍(lán)色的事件過(guò)程為： Private Sub Command1_Click() Form1.BackColor = vbBlueEnd Sub四、方法是指對(duì)象要執(zhí)行的動(dòng)作。 例:清除窗體Form1上的文字和圖形調(diào)用方法的語(yǔ)句為： Form1.Cls方法調(diào)用格式: . 2.2 2.2 窗體窗體一、窗體創(chuàng)建“工程”菜單

4、中選擇“添加窗體” 用鼠標(biāo)指向工程資源管理器中的工程，單擊右鍵，從彈出的快捷菜單中選擇“添加”菜單中的“添加窗體” 用鼠標(biāo)單擊常用工具欄中“添加窗體”按鈕。窗體(Form)就是窗口,是VB中最常見(jiàn)的對(duì)象,也是可視化程序設(shè)計(jì)的基礎(chǔ)各種控件對(duì)象必須建立在窗體上.一個(gè)窗體對(duì)應(yīng)一個(gè)窗體模塊窗體結(jié)構(gòu)邊框關(guān)閉最大化/還原最小化標(biāo)題欄控制菜單 具有控制菜單、標(biāo)題欄、最大化/還原按鈕、最小化按鈕、關(guān)閉按鈕及邊框。 運(yùn)行時(shí)通過(guò)移動(dòng)窗體、改變窗體大小。二、窗體的屬性屬性決定窗體的外觀和操作。常用的窗體屬性有：Name(名稱): 窗體名稱,文件名擴(kuò)展名為. frmBackColor 窗體的背景顏色: BorderS

5、tyle 窗體邊框樣式Caption 標(biāo)題欄顯示的內(nèi)容ControlBox 決定窗體是否具有控制菜單Font 輸出字符的字體、大小、顏色等Icon 決定窗體運(yùn)行時(shí)處于最小化時(shí)所顯示的圖標(biāo)MaxButton 決定窗體標(biāo)題欄中是否具有最大化按鈕Moveable 決定窗體是否能移動(dòng)Picture 設(shè)置在窗體上顯示的圖片WindowState 決定運(yùn)行時(shí)窗體是正、最小化還是最大化Height 窗體高度 包括邊框與標(biāo)題 單位為T(mén)wipWidth 窗體的寬度 包括邊框與標(biāo)題 單位為T(mén)wipLeft 窗體的最左端與包含它的容器的最左端之間的距離Top 窗體的最上端與包含它的容器的最上端之間的距離ScaleH

6、eight 窗體數(shù)據(jù)區(qū)的高度，不包括邊框、標(biāo)題、菜單欄等ScaleWidth 窗體數(shù)據(jù)區(qū)的寬度，不包括邊框、標(biāo)題、菜單欄等ScaleLeft/ScaleTop 窗體數(shù)據(jù)區(qū)坐標(biāo)原點(diǎn)（0，0）的位置ScaleMode 窗體度量單位StartUpPosition 窗體首次出現(xiàn)在窗體上的位置Visible 窗體是否可見(jiàn)在程序中設(shè)計(jì)顏色的三種方法：1.直接使用顏色值或VB顏色常量2.RGB函數(shù) 格式：RGB(red,green,blue) 02553.QBColor函數(shù)格式：QBColor(colorvalue) 015事件常用事件有： Click(單擊)事件 單擊窗體的空白區(qū),響應(yīng)該事件 DblCli

7、ck(雙擊)事件 雙擊窗體的空白區(qū),響應(yīng)該事件 Load(裝入)事件 當(dāng)窗體被裝入工作區(qū)時(shí)，響應(yīng)該事件 Activate(活動(dòng))事件 當(dāng)窗體變?yōu)榛顒?dòng)窗口時(shí)，響應(yīng)該事件Unload(卸載）事件 當(dāng)從內(nèi)存中卸載窗體時(shí)，響應(yīng)該事件QueryUnload 事件 當(dāng)從內(nèi)存中卸載窗體之前時(shí)，響應(yīng)該事件Resize事件 當(dāng)窗體首次顯示在屏幕上或窗體大小改變KeyPress KeyDown KeyUp三、 事件四、方法Load 裝載窗體到內(nèi)存，會(huì)引發(fā)窗體的Load事件，但不顯示窗體 語(yǔ)法格式為： 窗體名.LoadShow 顯示窗體 語(yǔ)法格式為： 窗體名.Show Style,ownerformHide 隱藏窗

8、體 語(yǔ)法格式為： 窗體名.HidePrint 調(diào)用格式：對(duì)象名.Print 輸出項(xiàng)列表; | , Cls 清除窗體上用Print方法顯示的信息和用繪圖方法生成的圖形 語(yǔ)法格式為： 窗體名.ClsMove 移動(dòng)并改變窗體的位置和大小 語(yǔ)法格式為：窗體名.Move ,Top,width,height復(fù)習(xí)1、VB集成開(kāi)發(fā)環(huán)境的定制（視圖菜單）2、新建工程與添加窗體（處理多重窗體工程|屬性）3、概念 （1）對(duì)象：是具有特殊屬性（數(shù)據(jù)）和行為方式（方法）的實(shí)體。在VB中，是你可控制的某種東西，應(yīng)用程序的每個(gè)窗體和窗體上的控件都是VB的對(duì)象。 （2）對(duì)象三要素 a. 屬性：用于描述對(duì)象的某些外部特征。 屬

9、性窗口中設(shè)置 設(shè)置屬性方法 程序代碼中設(shè)置 對(duì)象名.屬性名=屬性值 b.事件：是VB預(yù)先設(shè)置好的、能被對(duì)象識(shí)別的動(dòng)作。體現(xiàn)了對(duì)象對(duì)于外部操作或動(dòng)作的響應(yīng)能力。用戶可編寫(xiě)程序代碼（事件過(guò)程）來(lái)響應(yīng)事件發(fā)生時(shí)所執(zhí)行的操作。 事件過(guò)程格式： Private Sub 對(duì)象名稱-事件名稱（） 事件過(guò)程程序代碼 End Subc.方法：是指對(duì)象自身可以進(jìn)行的動(dòng)作或行為。實(shí)際上是對(duì)象本身所內(nèi)含的一些特殊函數(shù)或過(guò)程，調(diào)用這些函數(shù)或過(guò)程來(lái)實(shí)現(xiàn)對(duì)應(yīng)的動(dòng)作。 調(diào)用格式： 對(duì)象名稱.方法名稱 例如：Form1.Print “長(zhǎng)春工程學(xué)院“方法：打印方法（用于將文本輸出到對(duì)象上）l調(diào)用格式：G對(duì)象除了可以是窗體外，還可

10、以是圖片框(PictureBox)、Debug或打印機(jī)(Printer)，若缺省對(duì)象名，表示將文本輸出到當(dāng)前窗體上G輸出項(xiàng)列表：是由0個(gè)、1個(gè)或多個(gè)待輸出的數(shù)值表達(dá)式或字符串表達(dá)式構(gòu)成；當(dāng)輸出項(xiàng)是由多個(gè)項(xiàng)構(gòu)成，則中間必須用逗號(hào)或分號(hào)分隔；若Print后什么都不跟，則表示輸出一個(gè)空行JForm1.Print 1, 2, 3Print 1, 2, 3Picture1.Print 1, 2, 3Form1.PrintPrintPicture1.Print G;(分號(hào))和,(逗號(hào))分隔符：用于分隔前后兩個(gè)輸出項(xiàng)，并決定分隔符后的下一個(gè)輸出項(xiàng)的輸出位置G分號(hào)(;)表示下一個(gè)輸出項(xiàng)將以緊湊格式，緊跟著上一

11、個(gè)輸出項(xiàng)輸出，中間沒(méi)有空格G逗號(hào)(,)表示采用標(biāo)準(zhǔn)格式，下一個(gè)輸出項(xiàng)將在下一個(gè)打印區(qū)(每隔14列開(kāi)始一個(gè)打印區(qū)，每列的寬度是所有字符的平均寬度)的起始位置輸出JPrint 1, 2, 3Print “We”；“study”；“VB”E 標(biāo)準(zhǔn)格式E 緊縮格式JPrint 1, 2, 3Print We, study, VB5.0 運(yùn)行結(jié)果 1-2 3WestudyVB標(biāo)準(zhǔn)格式GPrint各數(shù)據(jù)分別存儲(chǔ)在各自的標(biāo)準(zhǔn)輸出區(qū)內(nèi)，數(shù)據(jù)之間留有一定的空格字符，數(shù)據(jù)劃分非常明顯（讀取數(shù)據(jù)容易）G對(duì)于一個(gè)數(shù)值型數(shù)據(jù)，前面有一個(gè)符號(hào)位（對(duì)于正號(hào)，不顯示但留有一個(gè)空格），數(shù)據(jù)后留有一個(gè)空格作為分隔符JPrint

12、1； 2； 3Print We； study； VB5.0 運(yùn)行結(jié)果 1 -2 3WestudyVB緊湊格式GPrint各數(shù)據(jù)緊湊地顯示，節(jié)省空間G對(duì)于一個(gè)數(shù)值型數(shù)據(jù)，前面有一個(gè)符號(hào)位（對(duì)于正號(hào)，不顯示但留有一個(gè)空格），數(shù)據(jù)后留有一個(gè)空格作為分隔符G對(duì)于字符串?dāng)?shù)據(jù)，輸出的各字符串?dāng)?shù)據(jù)間沒(méi)有空格而連成一片，造成讀取數(shù)據(jù)的困難例題用Print方法的標(biāo)準(zhǔn)和緊湊格式輸出數(shù)據(jù)，請(qǐng)寫(xiě)出程序運(yùn)行結(jié)果Private Sub Form_Click() Print 標(biāo)準(zhǔn)格式 Print 數(shù)值, 123, Print 字符, VB Print Print 緊縮格式 Print 數(shù)值; 123; Print 字符;

13、VB Print Print 標(biāo)準(zhǔn)和緊縮格式混合使用 Print 數(shù)值; 123, 字符; VBEnd SubG定位輸出函數(shù)： ：可選的。在顯示或打印列表中的下一個(gè)輸出項(xiàng)前插入n個(gè)空格，從而實(shí)現(xiàn)對(duì)輸出進(jìn)行定位：可選的。用來(lái)將輸出定位在絕對(duì)n列號(hào)上，使用無(wú)參數(shù)的Tab()表示將輸出定位在下一個(gè)打印區(qū)的起始位置 例題例題用Print方法和定位函數(shù)輸出數(shù)據(jù)：下一個(gè)輸出項(xiàng)前插入n個(gè)空格：輸出定位在絕對(duì)n列號(hào)上Private Sub Form_Click() Print Tab(8); A Print Tab(6); B; Spc(2); B Print Spc(3); C; Spc(2); C; Sp

14、c(2); C Print Tab(2); D; Spc(2); D; Spc(2); D; Spc(2); DEnd Sub習(xí)題用print方法打印圖形（）（）新建一個(gè)工程設(shè)計(jì)用戶界面編寫(xiě)事件過(guò)程及通用過(guò)程代碼保存、調(diào)試、運(yùn)行，形成可執(zhí)行文件程序設(shè)計(jì)的基本步驟2.3 2.3 應(yīng)用程序設(shè)計(jì)過(guò)程實(shí)例應(yīng)用程序設(shè)計(jì)過(guò)程實(shí)例 本節(jié)以一具體實(shí)例說(shuō)明創(chuàng)建Visual Basic應(yīng)用程序過(guò)程。 設(shè)計(jì)一窗體，窗體標(biāo)題設(shè)置為“窗體實(shí)驗(yàn)”，F(xiàn)ont屬性為“幼圓小三號(hào)”字，窗體啟動(dòng)時(shí)處于屏幕中央；在窗體裝入時(shí)將其背景色設(shè)為黃色；當(dāng)用鼠標(biāo)單擊窗體時(shí)在窗體上用Print方法輸出“長(zhǎng)春工程學(xué)院”和“土木工程系”。第一步

15、創(chuàng)建工程 途徑有兩種： 啟動(dòng)VB后，在系統(tǒng)顯示的“新建工程”對(duì)話框的“新建”選項(xiàng)卡中選擇“標(biāo)準(zhǔn)EXE”，然后單擊“打開(kāi)”按鈕。 在“文件”菜單中選擇“新建工程”命令，然后在“新建工程”對(duì)話框中選擇“標(biāo)準(zhǔn)EXE”，然后單擊“打開(kāi)”按鈕。第二步 設(shè)計(jì)應(yīng)用程序界面第三步 設(shè)置對(duì)象屬性第四步 編寫(xiě)代碼 第五步 保存、調(diào)試與運(yùn)行 選擇“文件”菜單中的“保存工程”或“工程另存為”命令，或單擊工具欄中的“保存工程”按鈕。若是第一次保存，則系統(tǒng)彈出“文件另存為”對(duì)話框。在“文件對(duì)話框”中選擇合適的文件夾后，點(diǎn)擊“保存”即可。文件名文件夾文件名后綴保存窗體文件后，系統(tǒng)會(huì)彈出“工程另存為”對(duì)話框，同樣選擇文件夾，

16、點(diǎn)擊“保存”第六步 生成可執(zhí)行文件 編譯成.exe文件,可脫離VB環(huán)境運(yùn)行選擇“文件”菜單中的“生成可執(zhí)行文件” ，則系統(tǒng)彈出“生成工程”對(duì)話框。在“生成文件對(duì)話框”中選擇合適的文件夾，輸入文件名后，擊“確定”即可。2.4 2.4 最基本控件最基本控件一、命令按鈕（CommandButton） VB中最常用的控件之一. 常用來(lái)接受用戶的操作信息, 激發(fā)相應(yīng)的事件過(guò)程, 是用戶與程序交互的最簡(jiǎn)便的方法,但具體產(chǎn)生的動(dòng)作則由相應(yīng)的事件過(guò)程中的程序代碼決定.命令按鈕主要屬性NameCaptionFontCancel和DefaultEnabledStylePictureDownPicture和Disa

17、bledPictureValue Command1.Value=True 自動(dòng)觸發(fā)按鈕的Click事件VisibleEnabled=falseStyle屬性為0Style屬性為1(標(biāo)題)：屬性值是顯示在按鈕上的文字J關(guān)閉G創(chuàng)建命令按鈕的訪問(wèn)鍵快捷方式： 運(yùn)行時(shí)，同時(shí)按下，即可觸發(fā)命令按鈕的單擊事件J&Close G若不創(chuàng)建訪問(wèn)鍵，但需要在標(biāo)題中包含“&”連字符，則應(yīng)設(shè)置連續(xù)的兩個(gè)連字符JAdd&Minus(確定)：每個(gè)窗體可選擇一個(gè)命令按鈕作為默認(rèn)的確認(rèn)按鈕，即不管窗體上目前哪個(gè)控件對(duì)象具有焦點(diǎn)，只要用戶按“Enter”回車(chē)鍵，就等同于單擊該命令按鈕；指定該默認(rèn)的確認(rèn)按

18、鈕，只需將其Default屬性值設(shè)為“True”(真)(取消)：每個(gè)窗體可選擇一個(gè)命令按鈕作為默認(rèn)的取消按鈕，只需將這個(gè)命令按鈕的Cancel屬性設(shè)為“True”，則不管目前窗體的哪個(gè)控件對(duì)象具有焦點(diǎn)，按“Esc”鍵即等同于單擊本按鈕(活動(dòng))：決定按鈕是否響應(yīng)用戶或系統(tǒng)事件 事件命令按鈕可以接受許多事件, 如： 鼠標(biāo)單擊(Click) 鼠標(biāo)按下(MouseDown) 鼠標(biāo)抬起(MouseUp) 鍵盤(pán)按下或松開(kāi)事件(KeyPress、KeyUp)其中鼠標(biāo)單擊事件最常用.方法可以用SetFocus方法將焦點(diǎn)定位在指定的命令按鈕上.如 Command1.SetFocus表示將焦點(diǎn)定位在名稱為Comm

19、and1的命令按鈕上.二、標(biāo)簽（Label） VB提供的標(biāo)簽控件只能顯示文本，而不能對(duì)文本進(jìn)行編輯。標(biāo)簽通常用于標(biāo)注本身具有Caption屬性的控件。例如，可以使用標(biāo)簽為文本框附加描述信息。標(biāo)簽也常用于輸出。1屬性 Caption屬性：字符型。標(biāo)簽的標(biāo)題。 Alignment屬性：數(shù)值型。確定標(biāo)簽中標(biāo)題的對(duì)齊方式，有以下設(shè)置值： 0-LeftJustify 缺省值，標(biāo)題從標(biāo)簽的左邊開(kāi)始顯示。 1-RightJustif 標(biāo)題靠右顯示。 2-Center 標(biāo)題居中顯示。 AutoSize屬性：布爾型。設(shè)置為T(mén)rue時(shí)，可根據(jù)標(biāo)題自動(dòng)調(diào)整標(biāo)簽的大?。辉O(shè)置為False(缺省值)時(shí)，標(biāo)簽保持設(shè)計(jì)時(shí)定義

20、的大小，太長(zhǎng)的標(biāo)題內(nèi)容將不能顯示出來(lái)。 BackStyle屬性：數(shù)值型。缺省值為1，標(biāo)簽不透明；設(shè)置為0時(shí)，標(biāo)簽透明。 WordWrap屬性：布爾型。設(shè)置為T(mén)rue時(shí)，標(biāo)簽將在垂直方向變化大小以與標(biāo)題相適應(yīng)，此時(shí)，Autosize屬性應(yīng)設(shè)置為T(mén)rue；設(shè)置為False時(shí) (缺省值)，標(biāo)簽不能在垂直方向上擴(kuò)展。Mousepointer屬性：當(dāng)鼠標(biāo)移動(dòng)到標(biāo)簽時(shí)顯示的鼠標(biāo)指針類型。值為99時(shí)自定義Mouseicon屬性：設(shè)置自定義的鼠標(biāo)圖標(biāo)，此時(shí)mousepointer屬性值為99。標(biāo)簽控件可以支持Click、DblClick等事件。例:設(shè)窗體上有一個(gè)標(biāo)簽控件Labell，其AutoSize屬性值為

21、True，雙擊該標(biāo)簽控件，則標(biāo)簽的標(biāo)題字體增加10磅，可以通過(guò)如下代碼實(shí)現(xiàn)：2事件Private Sub Label1_DblClick( ) LabellFontSize = LabellFontSize + 10 End Sub標(biāo)簽控件支持Move方法，用于實(shí)現(xiàn)控件的移動(dòng)。Move方法的格式： Move ，： 指示對(duì)象左邊的水平坐標(biāo)(x-軸)。： 指示對(duì)象頂邊的垂直坐標(biāo)(y-軸)。： 指示對(duì)象新的寬度。 、：指示對(duì)象新的高度。例如，設(shè)窗體上有一個(gè)標(biāo)簽控件Labell，單擊該標(biāo)簽控件，使該標(biāo)簽控件向右移動(dòng)50緹，可以通過(guò)如下代碼實(shí)現(xiàn)：3方法Private Sub Labeli_C1ick()

22、 LabellMove LabellLeft + 50End SubTopHeightLeft Width對(duì)象大小、位置屬性示意圖 例2-1 窗體上放一標(biāo)簽，caption屬性為“長(zhǎng)春工程學(xué)院”，font屬性為“隸書(shū)小二號(hào)”，mousepointer屬性為99，mouseicon屬性為“hand.cur”。再放一命令按鈕，caption屬性為“退出”。代碼運(yùn)行界面例2-2Private Sub Command1_Click() Label1.BorderStyle = 1End SubPrivate Sub Command2_Click() Label1.BorderStyle = 0End

23、SubPrivate Sub Command3_Click() Label1.BackStyle = 0End SubPrivate Sub Command4_Click() Label1.BackStyle = 1End Sub1) Name屬性: 文本框名稱 2) Text屬性：字符串類型。文本框不具有Caption屬性，用戶從文本框輸入和編輯、修改的文本內(nèi)容就保存在Text屬性中，常常。Text屬性的文本內(nèi)容最多為2048個(gè)字符，當(dāng)MultiLine屬性為T(mén)rue時(shí)，可輸入多達(dá)32KB的文本。 例如：Text1.Text = “歡迎使用 Visual Basic”3) MultiLine

24、屬性：布爾型。當(dāng)MultiLine屬性為T(mén)rue時(shí)，文本框可以輸入或顯示多行文本，且會(huì)在輸入的內(nèi)容超出文本框時(shí)自動(dòng)換行。默認(rèn)值為False。 三、文本框(TextBox) 文本框控件在工具箱中的名稱為T(mén)extBox，在VB中，可以使用文本框控件作為輸入控件，在運(yùn)行時(shí)接收用戶輸入的數(shù)據(jù)。1屬性 在設(shè)計(jì)階段，在屬性窗口設(shè)置Text屬性值時(shí)，通過(guò)按下Ctrl+Enter組合鍵實(shí)現(xiàn)文本的換行。 在運(yùn)行階段，如果窗體上沒(méi)有缺省按鈕，則在多行文本框(TextBox)控件中按下回車(chē)鍵可以把光標(biāo)移動(dòng)到下一行；如果有缺省按鈕存在，則必須按下Ctrl+Enter組合鍵才能移動(dòng)到下一行。 4) PasswordCh

25、ar屬性(口令) ：字符串類型。當(dāng)MuitiLine屬性值為False時(shí)，該屬性可以用于口令輸入。缺省值為空字符串，表示正常顯示輸入的字符；如該屬性的值為某個(gè)字符(*)，則表示本文本框用于輸入口令，用戶輸入的內(nèi)容仍保存在Text屬性中，但輸入的每個(gè)字符將被代換為PasswordChar屬性設(shè)定的字符顯示在文本框中。 PasswordChar和MaxLength屬性配合，經(jīng)常用于 。5) MaxLength(最大長(zhǎng)度)：缺省值是0，表示文本框可接受任意個(gè)數(shù)的字符，否則，文本框只接受MaxLength屬性設(shè)定的字?jǐn)?shù)。 在VB中字符的長(zhǎng)度以字為單位，即一個(gè)西文字符與一個(gè)漢字都是一個(gè)字，長(zhǎng)度為1.6)

26、 ScrollBars屬性： 數(shù)值型。缺省值為缺省值為“0”(“0”(無(wú)滾動(dòng)條無(wú)滾動(dòng)條) )；若該屬性設(shè)置為若該屬性設(shè)置為“1”“1”，表示有水平滾動(dòng)條；若為，表示有水平滾動(dòng)條；若為“2”“2”，表示有垂直滾動(dòng)條；若為表示有垂直滾動(dòng)條；若為“3”“3”，表示水平與垂直滾動(dòng)條兩，表示水平與垂直滾動(dòng)條兩者都有。本屬性只有在者都有。本屬性只有在MultiLineMultiLine屬性為屬性為“True”True”時(shí)才有效時(shí)才有效 . .7) Locked屬性：布爾型。決定文本框是否可以被編輯修改，默認(rèn)值為False，表示可以編輯。若取值為T(mén)rue，表示此時(shí)文本框中的內(nèi)容是只讀的、不具有交互性，類似于

27、標(biāo)簽，經(jīng)常用于8)SelStart、SelLength和SelText屬性：在程序運(yùn)行中，用于控制文本框中的插入點(diǎn)和文本選定操作.lSelStart屬性:返回或設(shè)置選定文本的開(kāi)始位置，第一個(gè)字符位置是0. 例如：Textl.SelStart = 0 表示選定文本的起始位置從第一個(gè)字符開(kāi)始。lSelLength屬性:返回或設(shè)置選定文本的長(zhǎng)度 例如： Text1.Sellength = Len(Text1.Text) 表示選中文本框Text1中所有字符。lSelText屬性設(shè)定或存放由前兩個(gè)屬性選定的文本內(nèi)容.JText1.SelStart = 1Text1.SelLength = 3Text2.

28、Text = Text1.SelText1)Change事件： 當(dāng)用戶向文本框輸人新的內(nèi)容，或在程序代碼中對(duì)文本框的Text屬性進(jìn)行賦值從而改變了文本框的Text屬性時(shí)，將觸發(fā)Change事件。 2事件和方法 文本框除了支持鼠標(biāo)的Click、DblClick事件外，還支持Change、GotFocus、LostFocus、KeyPress等事件和SetFocus方法。例：建立三個(gè)文本框和兩個(gè)命令按鈕。運(yùn)行時(shí)，用戶在文本框Text1中輸入內(nèi)容的同時(shí)，文本框Text2和Text3顯示相同的內(nèi)容，但顯示的字體不同。單擊“清除”按鈕清空三個(gè)文本框中的內(nèi)容，單擊“退出”按鈕結(jié)束程序的運(yùn)行設(shè)計(jì)界面運(yùn)行界面

29、程序代碼2) GotFOCUS事件： 當(dāng)運(yùn)行時(shí)用Tab鍵或用鼠標(biāo)選擇對(duì)象，或用SetFOCUS方法使光標(biāo)落在對(duì)象上時(shí)，觸發(fā)該事件，稱之為“獲得焦點(diǎn)”。該事件適用于窗體和大部分可接受鍵盤(pán)輸入的控件。Text1獲得焦點(diǎn)Text2獲得焦點(diǎn) 3) LostFOCUS事件： 當(dāng)按下Tab鍵使光標(biāo)離開(kāi)當(dāng)前文本框，或者用鼠標(biāo)選擇窗體的其他對(duì)象時(shí)觸發(fā)該事件，稱之為“失去焦點(diǎn)”。 4) KeyPress事件： 當(dāng)在鍵盤(pán)上按下某個(gè)鍵時(shí)觸發(fā)該事件。KeyPress事件返回一個(gè)參數(shù)KeyAscii，該參數(shù)值為整數(shù)，表示所按下鍵的ASC碼。 5) SetFocus方法： SetFocus方法是設(shè)置焦點(diǎn)，是設(shè)置焦點(diǎn)，是文

30、本框常用的方法。該方法是把光標(biāo)移到指定的文本框中，使指定的文本框指定的文本框( (或其他有聚焦能力的對(duì)象或其他有聚焦能力的對(duì)象) )成為焦點(diǎn)，成為焦點(diǎn)，也就是當(dāng)前文本框，成為焦點(diǎn)的文本框中具有閃動(dòng)的光標(biāo)也就是當(dāng)前文本框，成為焦點(diǎn)的文本框中具有閃動(dòng)的光標(biāo) 當(dāng)在窗體上建立了多個(gè)文本框后，可以使用該方法把光標(biāo)置于所需要的文本框上。使用格式如下： .SetFocus 例如，將焦點(diǎn)定位在文本框Textl中，使用語(yǔ)句：Textl.SetFocus作業(yè)：作業(yè)： 1、設(shè)計(jì)一文本框， 程序運(yùn)行時(shí)，通過(guò)用戶輸入，同步設(shè)置窗體的標(biāo)題，即用戶在文本框中輸入什么，窗體標(biāo)題就同步顯示什么。 2、單擊窗體上的“移動(dòng)”按鈕，

31、文字“Hello，VB！”在窗體中移動(dòng)一下；單擊“復(fù)位”按鈕，文字回到初始狀態(tài)；單擊“退出”按鈕，結(jié)束程序運(yùn)行。 3、在窗體上建立一個(gè)文本框、兩個(gè)命令按鈕，程序運(yùn)行后，單擊第一個(gè)按鈕，實(shí)現(xiàn)文本框輸入的內(nèi)容（Text）在窗體的標(biāo)題欄（Caption）顯示，單擊第二個(gè)按鈕，實(shí)現(xiàn)將文本框中被選中的部分文本（SelText）在窗體上輸出。程序運(yùn)行時(shí)，通過(guò)用戶輸入，同步設(shè)置窗體的標(biāo)題，即用戶輸入什么，窗體標(biāo)題就同步顯示什么&分析：l接收用戶輸入文本框l用戶輸入的內(nèi)容保存在文本框的Text屬性中l(wèi)窗體的標(biāo)題與文本框內(nèi)容一致賦值將文本框內(nèi)容Text賦予窗體的標(biāo)題屬性Captionl同步顯示文本框Ch

32、ange事件Private Sub Text1_Change() Form1.Caption = Text1.TextEnd Sub練 習(xí) 作業(yè)2-3Private sub 退出-click()endend subPrivate sub 移動(dòng)-click()label1.move label1.left+100,label1.top+100End subPrivate sub 復(fù)位-click()label1.left=100label1.top=100End sub作業(yè)2-4PRIVATE SUB COMMAND1-CLICK（）CAPTION=TEXT1.TEXTPRIVATE SUB C

33、OMMAND2-CLICK()PRINT TEXT.SELTEXT新建一個(gè)工程設(shè)計(jì)用戶界面編寫(xiě)事件過(guò)程及通用過(guò)程代碼保存、調(diào)試、運(yùn)行，形成可執(zhí)行文件程序設(shè)計(jì)的基本步驟2.4 2.4 應(yīng)用程序設(shè)計(jì)過(guò)程實(shí)例應(yīng)用程序設(shè)計(jì)過(guò)程實(shí)例 本節(jié)以一具體實(shí)例說(shuō)明創(chuàng)建Visual Basic應(yīng)用程序過(guò)程。 設(shè)計(jì)一窗體，窗體標(biāo)題設(shè)置為“窗體實(shí)驗(yàn)”，F(xiàn)ont屬性為“幼圓小三號(hào)”字，窗體啟動(dòng)時(shí)處于屏幕中央；在窗體裝入時(shí)將其背景色設(shè)為黃色；當(dāng)用鼠標(biāo)單擊窗體時(shí)在窗體上用Print方法輸出“長(zhǎng)春工程學(xué)院”和“環(huán)境工程系”。 本節(jié)以一具體實(shí)例說(shuō)明創(chuàng)建Visual Basic應(yīng)用程序過(guò)程。 2、設(shè)計(jì)一窗體，窗體標(biāo)題設(shè)置為“窗體實(shí)驗(yàn)”，F(xiàn)ont屬性