Basic60編程環(huán)境

1、Basic60編程環(huán)境 實訓(xùn)目的： 把握Visual Basic的啟動與退出方法。 把握建立、編輯和運行一個簡單的 Visual Basic應(yīng)用程序的步驟和 過程。 -1 al x| 實訓(xùn)內(nèi) pro_1.vbp文件名將編寫的程序儲存在磁 【實訓(xùn).1.1】創(chuàng)建一個新工程。.建立的用戶界面如圖1-1-1所示。程序 運行時,|，單擊窗體能夠改變標(biāo)簽中的文字顏色。然后以 mypro_1.frm和my 盤上。 圖1-1-1實訓(xùn)1.1的應(yīng)用程序界面 實訓(xùn)步驟： 啟動Visual Basic 6.0。啟動Visual Basic 6.0的方法有多種，通常 能夠雙擊桌面上的快捷圖標(biāo)進(jìn)行啟動。 啟動Visual

2、 Basic 6.0后，在系統(tǒng)彈出的“新建工程”對話框中， 詢咨詢要創(chuàng)建的工程類不，系統(tǒng)默認(rèn)的類不是創(chuàng)建一個“標(biāo)準(zhǔn) EXE ”應(yīng)用 程序。在此，直截了當(dāng)單擊“打開”按鈕，進(jìn)入編寫程序的狀態(tài)。 現(xiàn)在就能夠改變系統(tǒng)提供的窗體 Form1的屬性。注意，現(xiàn)在窗體F orm1的四周有8個小方框，表示窗體對象處于被選中狀態(tài)。8個小方框中 有3個是實心藍(lán)色的，將光標(biāo)移動到這些實心小方框上，按住鼠標(biāo)移動， 就能夠改變窗體的大小。改變窗體的大小事實上確實是改變窗體的Height 和Width屬性。因此，也能夠直截了當(dāng)在屬性窗口中對這兩個屬性進(jìn)行修 改，例如能夠把窗體的Height值設(shè)為3000, Width值設(shè)

3、為5000,還能夠把 窗體的Caption屬性值設(shè)為“練習(xí)1”。 向窗體Form1中增加一個標(biāo)簽控件（Label1），并用鼠標(biāo)將其選中 （選中時，周邊有8個藍(lán)色小方塊）。在屬性窗口中將Label1的BorderStyl e屬性值設(shè)為1，BackColor屬性設(shè)為白色，Caption屬性設(shè)為“我的Visual Basic程序”。在屬性窗口中找到Font屬性，單擊其右側(cè)的按鈕，在彈出的“字體”對話框中能夠?qū)?biāo)簽的字體、字號進(jìn)行設(shè)置。在此，能夠選擇 “宋體”、三號字，再單擊“確定”按鈕，關(guān)閉“字體”對話框。 為了在程序運行過程中讓文字改變顏色，能夠?qū)Υ绑w編寫一段單擊 事件過程，具體方法是：雙擊窗體，

4、打開代碼編輯窗口(見圖1-1-2)，在 過程框中選擇單擊事件 Click，代碼窗口中顯現(xiàn)相應(yīng)的Form_Click()過程框 架： Private Sub Form_Click() End Sub 在上述兩行代碼之間添加如下代碼: ! TWi _abel1.ForeColor = QBColor(lnt(Rnd * 16). Lab?: ll.FarrCaLnr = QBCnlarClnt.(Rnd += 16) JblClL eattl e 此每次單擊窗體時，文字的顏色就會不同。語句中使用了幾個內(nèi)部函數(shù), 有關(guān)的介紹可參考其他教材 圖1-1-2代碼編輯窗口 單擊工具欄中的啟動按鈕“或按F5鍵

5、運行程序。如果程序編寫正 確，屏幕上就會顯現(xiàn)有關(guān)于圖1-1-1所示的窗體運行界面，單擊窗體，標(biāo)簽 上的文字就會改變顏色。如果程序編寫有錯誤，系統(tǒng)會給出錯誤信息，能 夠按照提示修改程序，然后再運行。若要終止程序的運行，能夠單擊工具 欄上的終止運行按鈕。 程序能正確運行后，應(yīng)及時儲存。注意，一個Visual Basic工程至 少包含兩個磁盤文件，應(yīng)分不進(jìn)行儲存。選擇“文件”下拉菜單中的“儲 存工程”命令，系統(tǒng)彈出如圖1-1-3所示的“文件另存為”對話框，用于儲 存窗體文件?，F(xiàn)在，能夠選擇文件的存放位置和文件名。建議不使用系統(tǒng) 提供的默認(rèn)文件名，而是輸入自己指定的文件名。那個地點，在“文件名(N)；

6、 文本框中輸入mypro_1，然后單擊“儲存”按鈕。儲存窗體文件后，系統(tǒng)又 彈出“工程另存為”對話框，用于儲存工程文件。同樣，在“文件名(N) ” 文本框中輸入mypro_1，然后單擊“儲存”按鈕。如此就完成了儲存該工程 的任務(wù)。卿后要在蠱VSUBWBBSC環(huán)境中打開該工程時， 文件 程文件禍pro_fvbp即可 直截了當(dāng)打開工 中運行。如果想 文件。選擇“文 ：程”對話框， 樓i掩面儲存的工程文件只能在 Visual Basic編程環(huán)境 脫離犧環(huán)境直截了當(dāng)運行該程序，就需要將其生成可執(zhí)行 件”扌菜單中的 “生成mypro_1.exe”命令，系統(tǒng)彈出“生成工 確認(rèn)要生成的應(yīng)用程序文件名為 my

7、pro_1.exe以及該文件的存放位置后，單 擊“確臂 幌存類型：喝低文件 床氏初 E文件。 文件名和路徑生成可獨 取消 立運行的 EX 圖1-1-3“文件另存為”對話框 退出Visual Basic系統(tǒng)。退出的方法有多種，能夠在“文件”菜單 中選擇“退出”命令進(jìn)行退出。一樣情形下，系統(tǒng)在退出前會提示是否儲 存工程文件，現(xiàn)在按照需要進(jìn)行選擇即可。 注意事項： L的小寫字母“ I”和數(shù)字“ 1”的形狀幾乎相同，在輸入程序代碼 時要注意，千萬不能混淆。實訓(xùn)步驟中輸入的代碼“Labell.ForeColor = QBColor(lnt(Rnd * 16)”中的Labell，第5個字符是英文字母“ L

8、”的小 寫，第6個字符是數(shù)字“ 1”。 雙擊窗體打開代碼編輯窗口時，系統(tǒng)提供的是窗體裝載過程框架： Private Sub Form_Load() End Sub 注意：不要把代碼直截了當(dāng)加入該框架，而是選擇單擊事件過程框 架。 【實訓(xùn)1.2】 編程實現(xiàn)：程序開始運行時，窗體上的文本框顯示：“歡 迎使用我的VB程序”；當(dāng)用戶單擊(Click)窗體Form1時，文本框顯示“你 單擊了窗體”；用戶雙擊(DblClick)窗體Form1時，文本框顯示“你雙擊 了窗體”，如圖1-1-4所示。 提示： 本實訓(xùn)的目的是明白得窗體的裝載(Form_Load)、單擊(Click)和雙 擊(DlbClick )

9、事件。 實訓(xùn)步驟： 建立一個新工程，在窗體上添加一個文本框控件Textl，并將其He ight屬性設(shè)為700, Width屬性設(shè)為3300,然后通過Font屬性把字體設(shè)為宋 體、三號字。 編寫窗體的Form_Load事件過程代碼： Private Sub Form_Load() Text1.Text二歡迎使用我的VB程序 End Sub 編寫窗體的Click事件過程代碼： Private Sub Form_Click() Text1.Text =你單擊了窗體” End Sub 編寫窗體的DblClick事件過程代碼： End S ub亠兇 F oral H!Kt1.Text 二你雙擊 體 Q

10、Private Sub Form_DblClick() 你孜擊了窗體 調(diào)試、運行程序 你單擊了窗體 圖1-1-4實訓(xùn)1.2的程序運行界面 【實訓(xùn)1.3 實訓(xùn)步驟： 建立一個新工程，練習(xí)標(biāo)簽、文本框和命令按鈕的使用。 在窗體上添加一個標(biāo)簽(Label1)、一個文本框(Text1)和兩個命令按 鈕(Command1、Command2)。將文本框的Font屬性設(shè)置為“隸書、四號” 為“ 圖1-1-5實訓(xùn)1.3的窗體設(shè)計界面 緬 FOT1 -.I x| 立血框的背員色丸藍(lán)色 前盤色 不設(shè) 圖1-1-6實訓(xùn)1.3的 窗體運行界面 雙擊命令按鈕Command1,進(jìn)入代碼編輯窗口。編寫命令按鈕 Comma nd1的Click事件（前景色）過程代碼： Private Sub Comma nd1_Click() Label1.Caption二”文本框的前景色為紅色” Text1.ForeColor