項目一簡單個人信息編輯程序

項目一1一、項目功能通過一組VB基本控件接收用戶的信息錄入。包括：年齡、愛好、專業(yè)班級、照片等信息錄入選擇、更換照片操作、設置滾動問候語、設置信息確認對話框等功能。

一、項目功能通過一組VB基本控件接收用戶的信息錄入。包括：年2掌握對象簡單事件編程初步學會MsgBox對話框使用

會使用幫助解決問題能力目標掌握控件常用屬性、方法使用簡單事件編程對話框MsgBox參數(shù)知識目標常用控件的屬性、方法二、知識、能力和素質(zhì)目標掌握對象簡單事件編程初步學會MsgBox對話框使用會使用幫3三、任務劃分任務一任務二任務三設置個人基本信息更換照片設置設置滾動問候語任務四設置消息確認對話框三、任務劃分任務一任務二任務三設置個人基本信息更換照片設置設4任務一設置個人基本信息學號、姓名、性別、年齡、愛好、專業(yè)、班級信息輸入或選擇。功能命令按鈕CommandButton、標簽Label、文本框Textbox、框架Frame、單選按鈕OptionButton、復選框CheckBox、列表框ListBox、組合框ComboBox知識點任務一設置個人基本信息學號、姓名、性別、年齡、愛好、專業(yè)、5相關(guān)知識1、窗體的屬性、方法和事件 窗體（Form）是VB中最重要的對象，它是設計VB應用程序的基本平臺。窗體本身是一個對象，又是其他對象的載體或容器。相關(guān)知識1、窗體的屬性、方法和事件61.1屬性

Name：用于設置窗體的名稱，是識別窗體的唯一標識。Caption：用于設置窗體標題欄上的標題內(nèi)容。BackColor和ForeColor：設置窗體的背景色和前景色。Enabled：設置窗體是否可用、有效，默認值為True。Visible：設置窗體是否可見，默認值為True。Font：用于設置文本對象的字體、字型、字號等。Moveable：決定運行時窗體是否能移動。Left和Top：確定窗體的左上角在屏幕上的橫、縱坐標，以Twip為單位。(StartUpPosition屬性先設置為”手動”)Width和Height：確定窗體的初始寬度和高度。以Twip為單位。1.1屬性Name：用于設置窗體的名稱，是識別窗體的唯一7Picture：用于設置在窗體上顯示的圖像背景。Icon：設置窗體的圖標。Maxbutton和Minbutton：用于設置窗體上是否出現(xiàn)最大化或最小化的按鈕。ControlBox：用于設置窗體上是否出現(xiàn)控制菜單。BorderStyle：設置窗體的邊框風格。WindowState：設置窗體運行時的顯示狀態(tài)。Picture：用于設置在窗體上顯示的圖像背景。81.2方法

Show：用于顯示一個窗體，使該窗體變成活動窗體。Hide：用于隱藏一個窗體，注意：該窗體僅在屏幕上不可見，但仍然存在并沒有被卸載。Print：用于在窗體上輸出文本。Line：用于在窗體上畫線。Circle：用于在窗體上畫圓。Cls：用于清除運行時在窗體上顯示的文本或圖形。Move：用于移動并改變窗體的位置和大小。1.2方法Show：用于顯示一個窗體，使該窗體變成活動窗91.3事件

窗體作為對象，能夠?qū)κ录鞒鲰憫? 窗體事件過程的一般格式為： PrivateSubForm_事件名([參數(shù)表]) …… EndSub 不管窗體名字如何定義，但在事件過程中只能使用Form，而在過程內(nèi)對窗體進行引用時才會用到窗體名字（如Form1等）。1.3事件 窗體作為對象，能夠?qū)κ录鞒鲰憫?0Click：單擊事件。DblClick：雙擊事件。Load：裝載事件。Unload：卸載事件。QueryUnload：在卸載事件之前發(fā)生，常用來判斷是否關(guān)閉當前窗體。有一個Cancel參數(shù)。Resize：當窗體被改變大小時，觸發(fā)該事件。Activate：激活事件，當窗體被激活為當前活動窗口時，觸發(fā)該事件。Deactivate：失去激活事件，當窗體由當前活動窗口變?yōu)椴换顒哟翱跁r，觸發(fā)該事件。Click：單擊事件。11KeyPress：按鍵事件，當按下鍵盤上的某個鍵時，將觸發(fā)該事件。其事件過程的格式為： PrivateSub對象_KeyPress(KeyAsciiAsInteger) …… EndSub 參數(shù)KeyAscii返回所按鍵的ASCII碼（區(qū)分大小寫字母）。KeyDown：按鍵事件，當按下鍵盤上的某個鍵時，將觸發(fā)該事件。其事件過程的格式為： PrivateSub對象_KeyDown(KeyCodeAsInteger,ShiftAsInteger) …… EndSub 參數(shù)KeyCode返回所按鍵大寫字母的ASCII碼（不區(qū)分大小寫字母）。KeyPress：按鍵事件，當按下鍵盤上的某個鍵時，將觸發(fā)該122、窗體的顯示、隱藏、裝載和卸載

2.1窗體的顯示與隱藏 在程序代碼中，使用方法Hide和Show可以隱藏或顯示窗體。 顯示窗體：FormName.Show[Style]Style=0或省略 ′顯示為非模式Style=1 ′顯示為模式隱藏窗體：FormName.Hide2、窗體的顯示、隱藏、裝載和卸載2.1窗體的顯示與隱藏132.2裝載窗體和Load事件 使用裝載語句可把窗體（或其他對象）裝入內(nèi)存，但并不顯示它。 語法格式：Load對象名 例如：LoadForml ′加載窗體Forml到內(nèi)存中，但該窗體并不顯示出來2.3卸載窗體與Unload事件 使用卸載語句可把窗體（或其他對象）從內(nèi)存中卸載。 語法格式：Unload對象名 例如：UnloadMe ′卸載當前窗體，Me是系統(tǒng)保留字，代表當前窗體。2.2裝載窗體和Load事件 使用裝載語句可把窗體（143、停止程序執(zhí)行語句

格式：End 功能：結(jié)束整個應用程序的執(zhí)行。3、停止程序執(zhí)行語句 格式：End154、Print方法 Print方法用于顯示（輸出）文本，如果Print方法不帶有控件對象名時，它將把輸出的內(nèi)容輸出到當前窗體上。也常用于輸出到圖片框中。 語法格式：[對象名.]Print[表達式列表] 說明：表達式列表是一個或多個表達式，如果省略，則輸出一個空行；當輸出多個表達式時，各表達式之間用分號“;”（緊湊格式）或逗號“,”（按區(qū)格式:14個字符位置）隔開。 注意：當輸出數(shù)值數(shù)據(jù)時，前面有一個符號位（正數(shù)為空格），后面留有一個空格；輸出字符串時，前后則不留空格。4、Print方法 Print方法用于顯示（輸出）文本，如165、命令按鈕（CommandButton）

命令按鈕（CommandButton）用于接收用戶的操作信息，并引發(fā)應用程序的某個操作，是Windows平臺下最常用的控件。5、命令按鈕（CommandButton） 命令按鈕（C175.1屬性

Name（名稱）：命令按鈕名稱。Caption：設置命令按鈕上顯示的文本。使用快捷鍵：在使用的字母前加上“&”字符，程序運行時，當按下ALT+快捷鍵時，與在其上單擊鼠標的功能一樣。Default：設置默認按鈕，當該屬性值設為“True”時，按【Enter】鍵即等同于單擊本按鈕。Cancel：設置取消按鈕，當該屬性值設為“True”時，按【ESC】鍵即等同于單擊本按鈕。Enabled：設置運行時命令按鈕是否有效、可用。Style：設置命令按鈕的類型。Picture：設置命令按鈕上顯示的圖形，支持.bmp和.ico類型的文件。5.1屬性Name（名稱）：命令按鈕名稱。185.2方法

SetFocus：設置焦點，當該按鈕得到焦點后，可直接按回車鍵，執(zhí)行該按鈕所實現(xiàn)的功能。5.3事件Click：單擊事件。5.2方法SetFocus：設置焦點，當該按鈕得到焦點后196、標簽（Label）

標簽（Label）主要用來在窗體上顯示比較固定的提示性信息，通常用作標題、注釋和提示等信息的顯示。標簽只能用于輸出，不能用于接受用戶的輸入。6、標簽（Label） 標簽（Label）主要用來在窗體206.1屬性

Name（名稱）：標簽名稱。Caption：設置標簽上所要顯示的文本信息，是最重要的一個屬性。AutoSize：設置標簽的大小是否根據(jù)標簽中的內(nèi)容自動調(diào)整大小。Alignment：文本對齊屬性。BackStyle：設置標簽的背景模式。BorderStyle：設置標簽的邊框外觀。6.1屬性Name（名稱）：標簽名稱。217、文本框（TextBox）

文本框（TextBox）是一個文本編輯區(qū)域，用戶可以在該區(qū)域中輸入、編輯文本內(nèi)容，或者用來顯示相關(guān)的信息，是程序中最常用的進行輸入和輸出的控件。7、文本框（TextBox） 文本框（TextBox）是227.1屬性

Name（名稱）：文本框名稱。Text：用戶在文本框中輸入的內(nèi)容，或者通過程序返回文本框中所包含的文本內(nèi)容。Enabled：設置運行時文本框是否有效、可用。Locked：設置文本框中的內(nèi)容能否編輯。PasswordChar：確定在文本框中是否顯示用戶輸入的字符，常用于密碼輸入。MaxLength：確定文本框中輸入文本的最大長度。缺省是0，可容納任意多個輸入字符。中文VB中，一個漢字是作為一個字符來處理的。Alignment：文本對齊屬性。Multiline：指定文本框中是否允許顯示和輸入多行文本。ScrollBars：指定在文本框中是否出現(xiàn)滾動條，只有在Multiline屬性為True時才有效。7.1屬性Name（名稱）：文本框名稱。237.2方法

SetFocus：設置焦點，該方法可使指定的文本框得到焦點，得到焦點的文本框中具有閃動的光標。7.3事件Change：當文本框中的內(nèi)容（即Text屬性）發(fā)生變化時，引發(fā)該事件。GotFocus：當文本框得到焦點（即具有光標）時，引發(fā)該事件。LostFocus：當文本框失去焦點（即光標離開）時，引發(fā)該事件。KeyPress：當用戶點擊鍵盤上的某個按鍵時，引發(fā)該事件。7.2方法SetFocus：設置焦點，該方法可使指定的文248、文本框、命令按鈕編程示例登錄界面的設計8、文本框、命令按鈕編程示例登錄界面的設計25參考代碼：參考代碼：269、單選按鈕（OptionButton）

單選按鈕（OptionButton）控件由一個圓圈“○”及緊挨它的文字組成，能提供“選中”和“未選中”兩種可選項。 單選按鈕都是以成組的形式出現(xiàn)：或放在同一窗體中、或放在同一框架中、或放在同一圖片框中。9、單選按鈕（OptionButton） 單選按鈕（Op279.1屬性

Caption：設置選項的文本內(nèi)容。Value：表示單選按鈕是否被選中，選中時Value值為True，否則為False。使用單選按鈕組時，選中其中一個，其余就會自動關(guān)閉。Alignment：設置單選按鈕標題的對齊方式。Style：設置單選按鈕的樣式。9.2事件Click：單擊事件。9.1屬性Caption：設置選項的文本內(nèi)容。2810、復選框（CheckBox）

復選框(CheckBox)控件由一個四方形小框和緊挨它的文字組成。提供“選中”和“未選中”兩種可選項。 復選框控件與單選按鈕控件在使用方面的區(qū)別：單選按鈕每次只能選中一項，而復選框可同時選中多項。10、復選框（CheckBox） 復選框(CheckBo2910.1屬性

Caption：設置選項的文本內(nèi)容。Value：表示復選框的選定狀態(tài)。Alignment：設置復選框標題的對齊方式。Style：設置復選框的樣式。10.2事件Click：單擊事件。10.1屬性Caption：設置選項的文本內(nèi)容。3011、框架（Frame）

框架（Frame）是一種容器型的控件，常作為容器放置其他控件對象，將這些控件對象分成可標識的控件組，框架內(nèi)的所有控件將隨框架一起移動、顯示和消失。11、框架（Frame） 框架（Frame）是一種容器型3111.1屬性

Caption：設置框架的標題，顯示在框架的頂部。Visible：框架是否可見，若為False，則框架和其內(nèi)部控件都不可見。Enabled：設置框架是否有效，若為False，則框架和其內(nèi)部控件都不可操作。11.1屬性Caption：設置框架的標題，顯示在框架的3212、單選按鈕、復選框編程示例

設置字體外觀程序的設計12、單選按鈕、復選框編程示例設置字體外觀程序的設計33參考代碼：參考代碼：34項目1：簡單個人信息編輯程序3513、列表框（ListBox）

列表框（ListBox）用于列出可供用戶選擇的項目列表，用戶可從中選擇一個或多個選項。當顯示區(qū)域不能全部顯示時，會自動出現(xiàn)滾動條。13、列表框（ListBox） 列表框（ListBox）3613.1屬性

ListCount：返回列表框中列表項的數(shù)目。ListIndex：返回已選定列表項的索引（序號）。第一個列表項的值為0，最后一個列表項的值為ListCount-1，如果未選定任何項，則ListIndex的值為-1。List：用于存放列表框中的列表項，該屬性是一個字符型數(shù)組，數(shù)組的大小為ListCount，序號從0開始。訪問形式：對象名.List(列表項序號)。Text：存放當前選定表項的文本內(nèi)容，它與【對象名.List(對象名.ListIndex)】相同。Columns：設置列表框的顯示形式，取值為0時，逐行顯示列表項；取值為大于0的值時，列表項可占多列顯示。該屬性不能在運行時設置或更改。13.1屬性ListCount：返回列表框中列表項的數(shù)目37Sorted：設置列表框中各列表項在運行時是否按ASCII代碼排序。Selected：表示列表框中某一表項是否被選中，是一個邏輯數(shù)組，該屬性的表示方法同List屬性。該屬性只能在程序代碼中使用。ItemData：為每個列表項設置一個對應的數(shù)值，是一個數(shù)值型數(shù)組，該屬性的表示方法同List屬性。MultiSelect：設置是否允許同時選中多個列表項。Style：設置列表框的樣式。SelCount：返回所選列表項的數(shù)目。Sorted：設置列表框中各列表項在運行時是否按ASCII代3813.2方法AddItem：用于把一個列表項加入到列表框中。 格式：對象名.AddItem列表項[,插入位置序號] 說明：[插入位置序號]不能大于列表項數(shù)(ListCount)；若不指定插入位置，則插入到列表末尾。RemoveItem：用于刪除指定的列表項。 格式：對象名.RemoveItem刪除項序號Clear方法：用于清除列表框中的所有項目。13.2方法AddItem：用于把一個列表項加入到列表框中3913.3事件Click：單擊事件。DblChick：雙擊事件。13.3事件Click：單擊事件。40一點說明：窗體上有一個列表框（名稱為List1）和一個文本框（名稱為Text1）。 '文本框中顯示第一個列表項 Text1.Text=List1.List(0) '文本框中顯示最后一個列表項 Text1.Text=List1.List(List1.ListCount-1) '文本框中顯示當前選定的列表項 Text1.Text=List1.List(List1.ListIndex)一點說明：窗體上有一個列表框（名稱為List1）和一個文本框4114、組合框（ComboBox）

組合框（ComboBox）是列表框和文本框組合而成的一個控件，其具有列表框和文本框的大部分屬性和方法。 允許從已有的選項中進行選擇，還允許輸入列表中不包括的內(nèi)容。14、組合框（ComboBox） 組合框（ComboBo4214.1屬性

Text：文本屬性，該屬性是用戶所選定項目的文本或直接從文本框輸入的內(nèi)容。Style：外觀屬性，該屬性取值為0、1或2，分別決定了組合框的三種不同類型。其他相關(guān)屬性可參考列表框（ListBox）。14.1屬性Text：文本屬性，該屬性是用戶所選定項目的4314.2方法同列表框（ListBox）的方法相同：AddItem、RemoveItem、Clear。14.2方法同列表框（ListBox）的方法相同：AddI4414.3事件Style=0時：Click、Change事件Style=1時：DblClick、Click、Change事件Style=2時：Click事件14.3事件Style=0時：Click、Change4515、列表框、組合框編程示例

選項的添加、以及多重選項的刪除15、列表框、組合框編程示例選項的添加、以及多重選項的刪除46參考代碼：參考代碼：47任務二更換照片設置

照片的顯示、另外可以通過一組文件選擇控件，對個人照片進行更換。功能圖片框（PictureBox）、圖像框Image、驅(qū)動器列表框DriveListBox、目錄列表框

DirListBox、文件列表框FileListBox知識點任務二更換照片設置照片的顯示、另外可以通過一組文件選擇控48相關(guān)知識1、圖片框（PictureBox） 圖片框（PictureBox）和圖像框（Image）都是用于顯示圖形。圖片框可以作為其他控件的容器，還可以在圖片框上面放置其他控件，這些控件隨圖片框的移動而移動。相關(guān)知識1、圖片框（PictureBox）491.1屬性

Picture：用于設置在圖片框中要顯示的圖像文件。Align：設置圖片框在窗體中的顯示方式。AutoSize：確定圖片框如何與圖形相適應。1.1屬性Picture：用于設置在圖片框中要顯示的圖像501.2加載圖片（LoadPicture函數(shù)）格式：LoadPicture([FileName])示例：Picture1.Picture=LoadPicture("C:\abc\test.bmp")Picture1.Picture=LoadPicture() '清除圖片1.2加載圖片（LoadPicture函數(shù)）格式：Lo511.3保存圖片（SavePicture語句）格式：SavePicturePicture,FileName示例：SavePicturePicture1.Picture,"C:\abc\temp.bmp"1.3保存圖片（SavePicture語句）格式：S522、圖像框（Image）

圖像框（Image）控件的作用與圖片框PictureBox控件相似，但它只能用于顯示圖形，不能作為其他控件的容器。2、圖像框（Image） 圖像框（Image）控件的作532.1屬性

Picture：用于設置在圖像框中要顯示的圖像文件。Stretch：True–圖像拉伸或壓縮，以適應控件的要求；False–控件自動調(diào)整大小，以適應圖像的要求。2.1屬性Picture：用于設置在圖像框中要顯示的圖像543、文件系統(tǒng)控件

VB工具箱中提供了三種文件系統(tǒng)控件：驅(qū)動器列表框（DriveListBox）、文件夾列表框（DirListBox）和文件列表框（FileListBox）。利用這三種控件，可以建立與Windows資源管理器的目錄管理類似的文件管理界面。 這三種控件可以單獨使用，也可以組合使用。3、文件系統(tǒng)控件 VB工具箱中提供了三種文件系統(tǒng)控件：驅(qū)553.1驅(qū)動器列表框（DriveListBox）

驅(qū)動器列表框（DriveListBox）是一種下拉式列表框，用于更改當前驅(qū)動器。Drive屬性：返回或更改磁盤驅(qū)動器名稱，只能在程序中被引用或設置。3.1驅(qū)動器列表框（DriveListBox）驅(qū)動器列表563.2文件夾列表框（DirListBox）

目錄列表框顯示當前驅(qū)動器的目錄結(jié)構(gòu)及當前目錄下的所有子目錄。Path屬性：返回或設置當前路徑，只能在程序中被引用或設置。3.2文件夾列表框（DirListBox）目錄列表框顯示573.3文件列表框（FileListBox）

文件列表框顯示當前驅(qū)動器和當前目錄下的文件目錄清單。Path屬性：同目錄列表框的Path屬性。FileName屬性：返回或設置被選定文件的文件名和路徑，只能在程序中被引用或設置。Pattern屬性：返回或設置文件列表框所顯示的文件類型。3.3文件列表框（FileListBox）文件列表框顯示583.4三個控件的同步設置

三個控件必須聯(lián)合起來使用，才能同步更新顯示內(nèi)容，構(gòu)成一個文件管理系統(tǒng)。在驅(qū)動器列表框的Change事件中加入一條語句： dirDirectory.Path=drvDrive.Drive在目錄列表框的Change事件中加入一條語句： filFile.Path=dirDirectory.Path3.4三個控件的同步設置 三個控件必須聯(lián)合起來使用，才594、圖片框、文件系統(tǒng)控件編程示例

電腦中圖片的選擇與顯示4、圖片框、文件系統(tǒng)控件編程示例電腦中圖片的選擇與顯示60參考代碼：參考代碼：61任務三設置滾動問候語通過拖動滾動條控件改變問候語的移動速度功能水平滾動條Hscroll、定時器Timer知識點任務三設置滾動問候語通過拖動滾動條控件改變問候語的移動速度62相關(guān)知識1、水平滾動條（HScrollBar）和垂直滾動條（VScrollBar）

這兩種控件為不能自動支持滾動的應用程序和控件提供滾動功能，也可作為數(shù)據(jù)輸入的工具。相關(guān)知識1、水平滾動條（HScrollBar）和垂直滾動條（631.1屬性

Min、Max：滾動條處于最大和最小位置時所代表的值。Min屬性的默認值為0，Max屬性的默認值為32767。Value：設置滑塊在滾動條中的位置值。SmallChange：單擊滾動條兩端的箭頭時，滑塊移動的增量值。LargeChange：單擊滾動條內(nèi)空白區(qū)域時，滑塊移動的增量值。1.1屬性Min、Max：滾動條處于最大和最小位置時所代641.2事件Scroll：當用鼠標拖動滾動塊時，觸發(fā)該事件。Change：當改變Value屬性值時，觸發(fā)該事件。當拖動后釋放滑塊、單擊滾動條內(nèi)空白區(qū)域或單擊滾動條兩端的箭頭時，Change事件都會發(fā)生。1.2事件Scroll：當用鼠標拖動滾動塊時，觸發(fā)該事件。652、定時器控件（Timer）

定時器控件（Timer）可以通過設置時間間隔，當經(jīng)過設定的時間后，即產(chǎn)生一次Timer事件（或稱報時），有規(guī)律地執(zhí)行Timer事件過程中的程序代碼?？梢愿鶕?jù)這個特性來定時控制某些操作，或進行計時。2、定時器控件（Timer） 定時器控件（Timer）可662.1屬性

Enabled：確定定時器是否可用。Interval：設置兩次Timer事件之間的時間間隔，其值以毫秒（1ms=1/1000s）為單位。2.1屬性Enabled：確定定時器是否可用。672.2事件Timer：當定時器控件在間隔了一個Interval設定的時間后，即觸發(fā)一次Timer事件。2.2事件Timer：當定時器控件在間隔了一個Interv683、色彩函數(shù)（RGB函數(shù)）

格式：RGB(r,g,b)說明：r、g、b分別為紅色、綠色、藍色三種基本色的亮度等級，取值范圍為0～255。示例： RGB(255,0,0)：純紅色 RGB(0,255,0)：純綠色 RGB(0,0,255)：純藍色3、色彩函數(shù)（RGB函數(shù)）格式：RGB(r,g,b)694、滾動條、定時器控件編程示例

調(diào)色板及問候語字幕程序的設計4、滾動條、定時器控件編程示例調(diào)色板及問候語字幕程序的設計70參考代碼：參考代碼：71任務四設置消息確認對話框?qū)⒂脩羲O置的信息以對話框窗口彈出來，以便于用戶確認功能Msgbox對話框使用知識點任務四設置消息確認對話框?qū)⒂脩羲O置的信息以對話框窗口彈出72相關(guān)知識1、輸出對話框（MsgBox函數(shù)）

MsgBox函數(shù)可以產(chǎn)生一個對話框來顯示提示消息，并要求用戶做出必要的響應。格式為：

變量=MsgBox(提示[,對話框類型][,對話框標題])說明：返回的是一個數(shù)值型的變量。當用戶單擊某個按鈕后，將返回一個數(shù)值以表明用戶單擊了哪個按鈕。例如：相關(guān)知識1、輸出對話框（MsgBox函數(shù)）73（1）用于指定按鈕數(shù)目及形式的VB常數(shù)（1）用于指定按鈕數(shù)目及形式的VB常數(shù)74（2）用于指定圖標樣式的VB常數(shù)（2）用于指定圖標樣式的VB常數(shù)75（3）用于指定默認選擇按鈕的VB常數(shù)（3）用于指定默認選擇按鈕的VB常數(shù)762、輸出對話框編程示例

窗體關(guān)閉時彈出確認界面的設計2、輸出對話框編程示例窗體關(guān)閉時彈出確認界面的設計77參考代碼：參考代碼：78四、項目實訓編寫“簡單個人信息編輯程序”，運行后的程序界面如下圖所示：四、項目實訓編寫“簡單個人信息編輯程序”，運行后79實訓目標：1、理解VB中面向?qū)ο蟮母拍睿?、掌握常用控件的使用；3、能夠合理選擇控件進行程序界面設計。實訓目標：1、理解VB中面向?qū)ο蟮母拍睿?0參考代碼：參考代碼：81項目1：簡單個人信息編輯程序82項目1：簡單個人信息編輯程序83要求：1、按照“項目報告書-簡單個人信息編輯程序”中的具體樣式書寫電子實驗報告。2、項目1源程序打包后一同提交。要求：1、按照“項目報告書-簡單個人信息編輯程序”中的具體樣84項目一簡單個人信息編輯程序

項目一85一、項目功能通過一組VB基本控件接收用戶的信息錄入。包括：年齡、愛好、專業(yè)班級、照片等信息錄入選擇、更換照片操作、設置滾動問候語、設置信息確認對話框等功能。

一、項目功能通過一組VB基本控件接收用戶的信息錄入。包括：年86掌握對象簡單事件編程初步學會MsgBox對話框使用

會使用幫助解決問題能力目標掌握控件常用屬性、方法使用簡單事件編程對話框MsgBox參數(shù)知識目標常用控件的屬性、方法二、知識、能力和素質(zhì)目標掌握對象簡單事件編程初步學會MsgBox對話框使用會使用幫87三、任務劃分任務一任務二任務三設置個人基本信息更換照片設置設置滾動問候語任務四設置消息確認對話框三、任務劃分任務一任務二任務三設置個人基本信息更換照片設置設88任務一設置個人基本信息學號、姓名、性別、年齡、愛好、專業(yè)、班級信息輸入或選擇。功能命令按鈕CommandButton、標簽Label、文本框Textbox、框架Frame、單選按鈕OptionButton、復選框CheckBox、列表框ListBox、組合框ComboBox知識點任務一設置個人基本信息學號、姓名、性別、年齡、愛好、專業(yè)、89相關(guān)知識1、窗體的屬性、方法和事件 窗體（Form）是VB中最重要的對象，它是設計VB應用程序的基本平臺。窗體本身是一個對象，又是其他對象的載體或容器。相關(guān)知識1、窗體的屬性、方法和事件901.1屬性

Name：用于設置窗體的名稱，是識別窗體的唯一標識。Caption：用于設置窗體標題欄上的標題內(nèi)容。BackColor和ForeColor：設置窗體的背景色和前景色。Enabled：設置窗體是否可用、有效，默認值為True。Visible：設置窗體是否可見，默認值為True。Font：用于設置文本對象的字體、字型、字號等。Moveable：決定運行時窗體是否能移動。Left和Top：確定窗體的左上角在屏幕上的橫、縱坐標，以Twip為單位。(StartUpPosition屬性先設置為”手動”)Width和Height：確定窗體的初始寬度和高度。以Twip為單位。1.1屬性Name：用于設置窗體的名稱，是識別窗體的唯一91Picture：用于設置在窗體上顯示的圖像背景。Icon：設置窗體的圖標。Maxbutton和Minbutton：用于設置窗體上是否出現(xiàn)最大化或最小化的按鈕。ControlBox：用于設置窗體上是否出現(xiàn)控制菜單。BorderStyle：設置窗體的邊框風格。WindowState：設置窗體運行時的顯示狀態(tài)。Picture：用于設置在窗體上顯示的圖像背景。921.2方法

Show：用于顯示一個窗體，使該窗體變成活動窗體。Hide：用于隱藏一個窗體，注意：該窗體僅在屏幕上不可見，但仍然存在并沒有被卸載。Print：用于在窗體上輸出文本。Line：用于在窗體上畫線。Circle：用于在窗體上畫圓。Cls：用于清除運行時在窗體上顯示的文本或圖形。Move：用于移動并改變窗體的位置和大小。1.2方法Show：用于顯示一個窗體，使該窗體變成活動窗931.3事件

窗體作為對象，能夠?qū)κ录鞒鲰憫? 窗體事件過程的一般格式為： PrivateSubForm_事件名([參數(shù)表]) …… EndSub 不管窗體名字如何定義，但在事件過程中只能使用Form，而在過程內(nèi)對窗體進行引用時才會用到窗體名字（如Form1等）。1.3事件 窗體作為對象，能夠?qū)κ录鞒鲰憫?4Click：單擊事件。DblClick：雙擊事件。Load：裝載事件。Unload：卸載事件。QueryUnload：在卸載事件之前發(fā)生，常用來判斷是否關(guān)閉當前窗體。有一個Cancel參數(shù)。Resize：當窗體被改變大小時，觸發(fā)該事件。Activate：激活事件，當窗體被激活為當前活動窗口時，觸發(fā)該事件。Deactivate：失去激活事件，當窗體由當前活動窗口變?yōu)椴换顒哟翱跁r，觸發(fā)該事件。Click：單擊事件。95KeyPress：按鍵事件，當按下鍵盤上的某個鍵時，將觸發(fā)該事件。其事件過程的格式為： PrivateSub對象_KeyPress(KeyAsciiAsInteger) …… EndSub 參數(shù)KeyAscii返回所按鍵的ASCII碼（區(qū)分大小寫字母）。KeyDown：按鍵事件，當按下鍵盤上的某個鍵時，將觸發(fā)該事件。其事件過程的格式為： PrivateSub對象_KeyDown(KeyCodeAsInteger,ShiftAsInteger) …… EndSub 參數(shù)KeyCode返回所按鍵大寫字母的ASCII碼（不區(qū)分大小寫字母）。KeyPress：按鍵事件，當按下鍵盤上的某個鍵時，將觸發(fā)該962、窗體的顯示、隱藏、裝載和卸載

2.1窗體的顯示與隱藏 在程序代碼中，使用方法Hide和Show可以隱藏或顯示窗體。 顯示窗體：FormName.Show[Style]Style=0或省略 ′顯示為非模式Style=1 ′顯示為模式隱藏窗體：FormName.Hide2、窗體的顯示、隱藏、裝載和卸載2.1窗體的顯示與隱藏972.2裝載窗體和Load事件 使用裝載語句可把窗體（或其他對象）裝入內(nèi)存，但并不顯示它。 語法格式：Load對象名 例如：LoadForml ′加載窗體Forml到內(nèi)存中，但該窗體并不顯示出來2.3卸載窗體與Unload事件 使用卸載語句可把窗體（或其他對象）從內(nèi)存中卸載。 語法格式：Unload對象名 例如：UnloadMe ′卸載當前窗體，Me是系統(tǒng)保留字，代表當前窗體。2.2裝載窗體和Load事件 使用裝載語句可把窗體（983、停止程序執(zhí)行語句

格式：End 功能：結(jié)束整個應用程序的執(zhí)行。3、停止程序執(zhí)行語句 格式：End994、Print方法 Print方法用于顯示（輸出）文本，如果Print方法不帶有控件對象名時，它將把輸出的內(nèi)容輸出到當前窗體上。也常用于輸出到圖片框中。 語法格式：[對象名.]Print[表達式列表] 說明：表達式列表是一個或多個表達式，如果省略，則輸出一個空行；當輸出多個表達式時，各表達式之間用分號“;”（緊湊格式）或逗號“,”（按區(qū)格式:14個字符位置）隔開。 注意：當輸出數(shù)值數(shù)據(jù)時，前面有一個符號位（正數(shù)為空格），后面留有一個空格；輸出字符串時，前后則不留空格。4、Print方法 Print方法用于顯示（輸出）文本，如1005、命令按鈕（CommandButton）

命令按鈕（CommandButton）用于接收用戶的操作信息，并引發(fā)應用程序的某個操作，是Windows平臺下最常用的控件。5、命令按鈕（CommandButton） 命令按鈕（C1015.1屬性

Name（名稱）：命令按鈕名稱。Caption：設置命令按鈕上顯示的文本。使用快捷鍵：在使用的字母前加上“&”字符，程序運行時，當按下ALT+快捷鍵時，與在其上單擊鼠標的功能一樣。Default：設置默認按鈕，當該屬性值設為“True”時，按【Enter】鍵即等同于單擊本按鈕。Cancel：設置取消按鈕，當該屬性值設為“True”時，按【ESC】鍵即等同于單擊本按鈕。Enabled：設置運行時命令按鈕是否有效、可用。Style：設置命令按鈕的類型。Picture：設置命令按鈕上顯示的圖形，支持.bmp和.ico類型的文件。5.1屬性Name（名稱）：命令按鈕名稱。1025.2方法

SetFocus：設置焦點，當該按鈕得到焦點后，可直接按回車鍵，執(zhí)行該按鈕所實現(xiàn)的功能。5.3事件Click：單擊事件。5.2方法SetFocus：設置焦點，當該按鈕得到焦點后1036、標簽（Label）

標簽（Label）主要用來在窗體上顯示比較固定的提示性信息，通常用作標題、注釋和提示等信息的顯示。標簽只能用于輸出，不能用于接受用戶的輸入。6、標簽（Label） 標簽（Label）主要用來在窗體1046.1屬性

Name（名稱）：標簽名稱。Caption：設置標簽上所要顯示的文本信息，是最重要的一個屬性。AutoSize：設置標簽的大小是否根據(jù)標簽中的內(nèi)容自動調(diào)整大小。Alignment：文本對齊屬性。BackStyle：設置標簽的背景模式。BorderStyle：設置標簽的邊框外觀。6.1屬性Name（名稱）：標簽名稱。1057、文本框（TextBox）

文本框（TextBox）是一個文本編輯區(qū)域，用戶可以在該區(qū)域中輸入、編輯文本內(nèi)容，或者用來顯示相關(guān)的信息，是程序中最常用的進行輸入和輸出的控件。7、文本框（TextBox） 文本框（TextBox）是1067.1屬性

Name（名稱）：文本框名稱。Text：用戶在文本框中輸入的內(nèi)容，或者通過程序返回文本框中所包含的文本內(nèi)容。Enabled：設置運行時文本框是否有效、可用。Locked：設置文本框中的內(nèi)容能否編輯。PasswordChar：確定在文本框中是否顯示用戶輸入的字符，常用于密碼輸入。MaxLength：確定文本框中輸入文本的最大長度。缺省是0，可容納任意多個輸入字符。中文VB中，一個漢字是作為一個字符來處理的。Alignment：文本對齊屬性。Multiline：指定文本框中是否允許顯示和輸入多行文本。ScrollBars：指定在文本框中是否出現(xiàn)滾動條，只有在Multiline屬性為True時才有效。7.1屬性Name（名稱）：文本框名稱。1077.2方法

SetFocus：設置焦點，該方法可使指定的文本框得到焦點，得到焦點的文本框中具有閃動的光標。7.3事件Change：當文本框中的內(nèi)容（即Text屬性）發(fā)生變化時，引發(fā)該事件。GotFocus：當文本框得到焦點（即具有光標）時，引發(fā)該事件。LostFocus：當文本框失去焦點（即光標離開）時，引發(fā)該事件。KeyPress：當用戶點擊鍵盤上的某個按鍵時，引發(fā)該事件。7.2方法SetFocus：設置焦點，該方法可使指定的文1088、文本框、命令按鈕編程示例登錄界面的設計8、文本框、命令按鈕編程示例登錄界面的設計109參考代碼：參考代碼：1109、單選按鈕（OptionButton）

單選按鈕（OptionButton）控件由一個圓圈“○”及緊挨它的文字組成，能提供“選中”和“未選中”兩種可選項。 單選按鈕都是以成組的形式出現(xiàn)：或放在同一窗體中、或放在同一框架中、或放在同一圖片框中。9、單選按鈕（OptionButton） 單選按鈕（Op1119.1屬性

Caption：設置選項的文本內(nèi)容。Value：表示單選按鈕是否被選中，選中時Value值為True，否則為False。使用單選按鈕組時，選中其中一個，其余就會自動關(guān)閉。Alignment：設置單選按鈕標題的對齊方式。Style：設置單選按鈕的樣式。9.2事件Click：單擊事件。9.1屬性Caption：設置選項的文本內(nèi)容。11210、復選框（CheckBox）

復選框(CheckBox)控件由一個四方形小框和緊挨它的文字組成。提供“選中”和“未選中”兩種可選項。 復選框控件與單選按鈕控件在使用方面的區(qū)別：單選按鈕每次只能選中一項，而復選框可同時選中多項。10、復選框（CheckBox） 復選框(CheckBo11310.1屬性

Caption：設置選項的文本內(nèi)容。Value：表示復選框的選定狀態(tài)。Alignment：設置復選框標題的對齊方式。Style：設置復選框的樣式。10.2事件Click：單擊事件。10.1屬性Caption：設置選項的文本內(nèi)容。11411、框架（Frame）

框架（Frame）是一種容器型的控件，常作為容器放置其他控件對象，將這些控件對象分成可標識的控件組，框架內(nèi)的所有控件將隨框架一起移動、顯示和消失。11、框架（Frame） 框架（Frame）是一種容器型11511.1屬性

Caption：設置框架的標題，顯示在框架的頂部。Visible：框架是否可見，若為False，則框架和其內(nèi)部控件都不可見。Enabled：設置框架是否有效，若為False，則框架和其內(nèi)部控件都不可操作。11.1屬性Caption：設置框架的標題，顯示在框架的11612、單選按鈕、復選框編程示例

設置字體外觀程序的設計12、單選按鈕、復選框編程示例設置字體外觀程序的設計117參考代碼：參考代碼：118項目1：簡單個人信息編輯程序11913、列表框（ListBox）

列表框（ListBox）用于列出可供用戶選擇的項目列表，用戶可從中選擇一個或多個選項。當顯示區(qū)域不能全部顯示時，會自動出現(xiàn)滾動條。13、列表框（ListBox） 列表框（ListBox）12013.1屬性

ListCount：返回列表框中列表項的數(shù)目。ListIndex：返回已選定列表項的索引（序號）。第一個列表項的值為0，最后一個列表項的值為ListCount-1，如果未選定任何項，則ListIndex的值為-1。List：用于存放列表框中的列表項，該屬性是一個字符型數(shù)組，數(shù)組的大小為ListCount，序號從0開始。訪問形式：對象名.List(列表項序號)。Text：存放當前選定表項的文本內(nèi)容，它與【對象名.List(對象名.ListIndex)】相同。Columns：設置列表框的顯示形式，取值為0時，逐行顯示列表項；取值為大于0的值時，列表項可占多列顯示。該屬性不能在運行時設置或更改。13.1屬性ListCount：返回列表框中列表項的數(shù)目121Sorted：設置列表框中各列表項在運行時是否按ASCII代碼排序。Selected：表示列表框中某一表項是否被選中，是一個邏輯數(shù)組，該屬性的表示方法同List屬性。該屬性只能在程序代碼中使用。ItemData：為每個列表項設置一個對應的數(shù)值，是一個數(shù)值型數(shù)組，該屬性的表示方法同List屬性。MultiSelect：設置是否允許同時選中多個列表項。Style：設置列表框的樣式。SelCount：返回所選列表項的數(shù)目。Sorted：設置列表框中各列表項在運行時是否按ASCII代12213.2方法AddItem：用于把一個列表項加入到列表框中。 格式：對象名.AddItem列表項[,插入位置序號] 說明：[插入位置序號]不能大于列表項數(shù)(ListCount)；若不指定插入位置，則插入到列表末尾。RemoveItem：用于刪除指定的列表項。 格式：對象名.RemoveItem刪除項序號Clear方法：用于清除列表框中的所有項目。13.2方法AddItem：用于把一個列表項加入到列表框中12313.3事件Click：單擊事件。DblChick：雙擊事件。13.3事件Click：單擊事件。124一點說明：窗體上有一個列表框（名稱為List1）和一個文本框（名稱為Text1）。 '文本框中顯示第一個列表項 Text1.Text=List1.List(0) '文本框中顯示最后一個列表項 Text1.Text=List1.List(List1.ListCount-1) '文本框中顯示當前選定的列表項 Text1.Text=List1.List(List1.ListIndex)一點說明：窗體上有一個列表框（名稱為List1）和一個文本框12514、組合框（ComboBox）

組合框（ComboBox）是列表框和文本框組合而成的一個控件，其具有列表框和文本框的大部分屬性和方法。 允許從已有的選項中進行選擇，還允許輸入列表中不包括的內(nèi)容。14、組合框（ComboBox） 組合框（ComboBo12614.1屬性

Text：文本屬性，該屬性是用戶所選定項目的文本或直接從文本框輸入的內(nèi)容。Style：外觀屬性，該屬性取值為0、1或2，分別決定了組合框的三種不同類型。其他相關(guān)屬性可參考列表框（ListBox）。14.1屬性Text：文本屬性，該屬性是用戶所選定項目的12714.2方法同列表框（ListBox）的方法相同：AddItem、RemoveItem、Clear。14.2方法同列表框（ListBox）的方法相同：AddI12814.3事件Style=0時：Click、Change事件Style=1時：DblClick、Click、Change事件Style=2時：Click事件14.3事件Style=0時：Click、Change12915、列表框、組合框編程示例

選項的添加、以及多重選項的刪除15、列表框、組合框編程示例選項的添加、以及多重選項的刪除130參考代碼：參考代碼：131任務二更換照片設置

照片的顯示、另外可以通過一組文件選擇控件，對個人照片進行更換。功能圖片框（PictureBox）、圖像框Image、驅(qū)動器列表框DriveListBox、目錄列表框

DirListBox、文件列表框FileListBox知識點任務二更換照片設置照片的顯示、另外可以通過一組文件選擇控132相關(guān)知識1、圖片框（PictureBox） 圖片框（PictureBox）和圖像框（Image）都是用于顯示圖形。圖片框可以作為其他控件的容器，還可以在圖片框上面放置其他控件，這些控件隨圖片框的移動而移動。相關(guān)知識1、圖片框（PictureBox）1331.1屬性

Picture：用于設置在圖片框中要顯示的圖像文件。Align：設置圖片框在窗體中的顯示方式。AutoSize：確定圖片框如何與圖形相適應。1.1屬性Picture：用于設置在圖片框中要顯示的圖像1341.2加載圖片（LoadPicture函數(shù)）格式：LoadPicture([FileName])示例：Picture1.Picture=LoadPicture("C:\abc\test.bmp")Picture1.Picture=LoadPicture() '清除圖片1.2加載圖片（LoadPicture函數(shù)）格式：Lo1351.3保存圖片（SavePicture語句）格式：SavePicturePicture,FileName示例：SavePicturePicture1.Picture,"C:\abc\temp.bmp"1.3保存圖片（SavePicture語句）格式：S1362、圖像框（Image）

圖像框（Image）控件的作用與圖片框PictureBox控件相似，但它只能用于顯示圖形，不能作為其他控件的容器。2、圖像框（Image） 圖像框（Image）控件的作1372.1屬性

Picture：用于設置在圖像框中要顯示的圖像文件。Stretch：True–圖像拉伸或壓縮，以適應控件的要求；False–控件自動調(diào)整大小，以適應圖像的要求。2.1屬性Picture：用于設置在圖像框中要顯示的圖像1383、文件系統(tǒng)控件

VB工具箱中提供了三種文件系統(tǒng)控件：驅(qū)動器列表框（DriveListBox）、文件夾列表框（DirListBox）和文件列表框（FileListBox）。利用這三種控件，可以建立與Windows資源管理器的目錄管理類似的文件管理界面。 這三種控件可以單獨使用，也可以組合使用。3、文件系統(tǒng)控件 VB工具箱中提供了三種文件系統(tǒng)控件：驅(qū)1393.1驅(qū)動器列表框（DriveListBox）

驅(qū)動器列表框（DriveListBox）是一種下拉式列表框，用于更改當前驅(qū)動器。Drive屬性：返回或更改磁盤驅(qū)動器名稱，只能在程序中被引用或設置。3.1驅(qū)動器列表框（DriveListBox）驅(qū)動器列表1403.2文件夾列表框（DirListBox）

目錄列表框顯示當前驅(qū)動器的目錄結(jié)構(gòu)及當前目錄下的所有子目錄。Path屬性：返回或設置當前路徑，只能在程序中被引用或設置。3.2文件夾列表框（DirListBox）目錄列表框顯示1413.3文件列表框（FileListBox）

文件列表框顯示當前驅(qū)動器和當前目錄下的文件目錄清單。Path屬性：同目錄列表框的Path屬性。FileName屬性：返回或設置被選定文件的文件名和路徑，只能在程序中被引用或設置。Pattern屬性：返回或設置文件列表框所顯示的文件類型。3.3文件列表框（FileListBox）文件列表框顯示142