【正文】 中文本的起始位置 。 第一字符 的位置為 0。 若沒有選擇文本 ， 則用于返回或設(shè)置文本的插入點(diǎn)位置 ， 如果 SelStart的值大于文本的長度 ， 則 SelStart取當(dāng)前文本的長度： SelLength：設(shè)置或返回文本框中選定的文本字符串長度（字符個(gè)數(shù)）。 SelText：設(shè)置或返回當(dāng)前選定文本中的文本字符串。 三、 文本框 TextBox 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 53 Change事件 ： 當(dāng)改變文本框的 Text屬性時(shí)會引發(fā)該事件。當(dāng)用輸入一個(gè)字符，就會觸發(fā)一次 Change事件。 例：在文本框 Text1的 Change事件編寫有如下程序代碼 ： Private Sub Text1_Change() Print End Sub 當(dāng)程序運(yùn)行后中輸入 ABCD，則在窗體上在輸出結(jié)果是？ 三、 文本框 TextBox ——常用事件 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 54 KeyPress事件 當(dāng)用戶按下并釋放鍵盤上一個(gè) ANSI鍵時(shí)，就會觸發(fā)一次該事件，并返回一個(gè) KeyAscii參數(shù)（字符的 Ascii值）到該事件過程中。 例如： Private Sub Text1_KeyPress(KeyAscii As Integer) Print KeyAscii, Chr(KeyAscii) End Sub 當(dāng)程序運(yùn)行后中輸入 ABCD，則在窗體上在輸出結(jié)果是？ LostFocus ： 當(dāng)控件失去焦點(diǎn)時(shí)發(fā)生。 GotFocus ： 當(dāng)控件獲得焦點(diǎn)時(shí)發(fā)生。 三、 文本框 TextBox ——常用事件 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 55 （三） 常用方法 文本框最有用的方法是： SetFocus，使用形式： [對象 .]SetFocus 功能： 是把光標(biāo)移到指定的文本框?qū)ο笾小? 三、 文本框 TextBox 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 56 Visual Basic程序的組成及工作方式 Visual Basic應(yīng)用程序的組成 工程文件 (.Vbp)包含了一個(gè)應(yīng)用程序的所有文件 窗體文件（ .frm） :控件及屬性、事件過程和自定義過程 窗體的二進(jìn)制數(shù)據(jù)文件（ .frx） ,自動(dòng)產(chǎn)生同名 ..frx文件。 標(biāo)準(zhǔn)模塊文件（ .bas） 類模塊的文件（ .cls） 資源文件（ .res） ActiveX控件的文件（ .ocx） 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 57 一個(gè) VB應(yīng)用程序中各主要文件的結(jié)構(gòu)關(guān)系如下圖： Visual Basic程序的組成及工作方式 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 58 Visual Basic應(yīng)用程序的工作方式 （ 1） 啟動(dòng)應(yīng)用程序 ， 裝載和顯示窗體 。 （ 2） 窗體 （ 或窗體上的控件 ） 接收事件 。 事件可由用戶引發(fā) （ 例如通過鍵盤或鼠標(biāo)操作 ） ， 可由系統(tǒng)引發(fā) （ 例如定時(shí)器事件 ） ， 也可由代碼間接引發(fā) （ 例如當(dāng)代碼裝載窗體時(shí)的 Load事件 ） 。 （ 3） 如果在相應(yīng)的事件過程中已編寫了相應(yīng)的程序代碼 ，就執(zhí)行該代碼 。 （ 4） 應(yīng)用程序等待下一次事件 。 Visual Basic程序的組成及工作方式 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 59 創(chuàng)建應(yīng)用程序的步驟 創(chuàng)建 Visual Basic應(yīng)用程序一般有以下幾個(gè)步驟 。 （ 1） 新建工程 。 創(chuàng)建一個(gè)應(yīng)用程序首先要打開一個(gè)新的工程 。 （ 2） 創(chuàng)建應(yīng)用程序界面 。 使用工具箱在窗體上放置所需控件 。其中 ， 窗體是用戶進(jìn)行界面設(shè)計(jì)時(shí)在其上放置控件的窗口 ， 它是創(chuàng)建應(yīng)用程序界面的基礎(chǔ) 。 （ 3） 設(shè)置屬性值 。 通過這一步驟來改變對象的外觀和行為 。 可通過屬性窗口設(shè)置 ， 也可通過程序代碼設(shè)置 。 （ 4） 對象事件過程的編程 。 通過代碼窗口為一些對象相關(guān)事件編寫代碼 。 （ 5） 保存文件 。 運(yùn)行調(diào)試程序之前 ， 一般要先保存文件 ， （ 6） 程序運(yùn)行與調(diào)試 。 測試所編程序 ， 直到運(yùn)行結(jié)果正確 ， 用戶滿意為止 ， 再次保存修改后的程序 。 Visual Basic程序的組成及工作方式 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 60 一個(gè)簡單的 Visual Basic程序的創(chuàng)建實(shí)例 例 16 設(shè)計(jì)一程序，當(dāng)程序運(yùn)行后，在窗體的正中間顯示“ 你好！請輸入你的姓名 ”，焦點(diǎn)定在其下的文本框中（如圖120所示），當(dāng)用戶輸入姓名并單擊“確定”按鈕后，在窗體中用黑體、三號、紅色顯示“ XXX同學(xué)，你好！祝你學(xué)好 VB程序設(shè)計(jì)”，同時(shí)窗體上出現(xiàn)兩個(gè)命令按鈕“繼續(xù)”和“結(jié)束”，其中“ XXX”是用戶輸入的姓名，例如，當(dāng)用戶輸入“王五”，單擊“確定”按鈕后，出現(xiàn)如圖 121界面，如果單擊“繼續(xù)”按鈕，則又回到初始運(yùn)行狀態(tài)；單擊“結(jié)束”按鈕即結(jié)束程序運(yùn)行。 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 61 一個(gè)簡單的 Visual Basic程序的創(chuàng)建實(shí)例 新建工程 程序界面設(shè)計(jì) 編寫相關(guān)事件的代碼 。 保存工程 運(yùn)行 、 調(diào)試程序 生成可執(zhí)行程序 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 62 一個(gè)簡單的 Visual Basic程序的創(chuàng)建實(shí)例 Private Sub Command1_Click() ? 確定命令按鈕單擊事件 = False = True ? 讓 Command2可見 = True ? 讓 Command3可見 = False = False = True = 12 = 黑體 = vbRed = amp。 同學(xué)，你好！祝你學(xué)好 VB程序設(shè)計(jì) End Sub Private Sub Command2_Click() ? 繼續(xù)命令按鈕單擊事件 = False = False = True = True ? 讓 Label1可見 = False ? 讓 Label1不可見 = True End Sub Private Sub Command3_Click() ? 結(jié)束命令按鈕單擊事件 End End Sub 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 63 本章向讀者介紹 Visual Basic開發(fā)集成環(huán)境，使讀者通過學(xué)習(xí)初步建立起面向?qū)ο蟪绦蛟O(shè)計(jì)的概念。然后講述 Visual Basic的基本概念及窗體對象的常用屬性、方法、事件。最后通過一個(gè)簡單的程序?qū)嵗?，介紹一個(gè)簡單的 Visual Basic應(yīng)用程序的建立過程。 本章小結(jié) 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站： 目錄 本章小結(jié) 作業(yè) 64 1．思考題 2．選擇題 本章作業(yè)