vb程序設(shè)計(jì)基礎(chǔ)全套課件vb教程第3章教案-資料下載頁
2025-01-09 03:42本頁面
【正文】 s = * r * r = k = s MsgBox 計(jì)算已完成 , , 例 End Sub Private Sub Command2_Click() End End Sub例 從輸入框中輸入圓的半徑，計(jì)算圓的周長和面積例 主頁當(dāng)輸入的圓半徑為 65時(shí)，運(yùn)行結(jié)果主頁 例 控制窗體 “ 變大 ” 和 “ 變小 ” 在窗體上設(shè)置三個(gè)命令按鈕 (圖 )，程序進(jìn)入運(yùn)行狀態(tài)后，當(dāng)單擊 “窗體變大 ”命令按鈕時(shí)，窗體變大，單擊 “窗體變小 ”按鈕時(shí)，窗體變小。單擊 “退出 ”按鈕時(shí)，則退出。 程序舉例例 主頁 (1)建立應(yīng)用程序的用戶界面和設(shè)置對象屬性 (2)編寫程序代碼 Private Sub Form_Load() = 4000 39。Height為窗體的高度， P55 = 4000 39。Height為窗體的寬度 = 1000 39。設(shè)置窗體的初始位置 = 1000 End Sub Private Sub Command1_Click() 39?！按绑w變大 ”按鈕 = + 200 39。每次增加 200點(diǎn) = + 200 End Sub Private Sub Command2_Click() 39。“窗體變小 ”按鈕 = 200 39。每次減少 200點(diǎn) = 200 End Sub主頁 在第一個(gè)文本框中輸入文字時(shí)，在另外兩個(gè)文本框中顯示同樣相同的內(nèi)容，但顯示的字號和字體不同。單擊 “清除 ”按鈕時(shí)則清除三個(gè)文本框中的內(nèi)容例 在三個(gè)文本框中顯示不同的文字效果 例 主頁 (1)建立應(yīng)用程序的用戶界面和設(shè)置對象屬性 (2)編寫程序代碼 ? Private Sub Form_Load() = 隸書 = 16 = 楷體 _GB2312 = 20 End Sub Private Sub Text1_Change() = = End Sub Private Sub Command1_Click() 39?！扒宄?”按鈕 = 39。清除文本框 Text1的內(nèi)容 = 39。清除文本框 Text2的內(nèi)容 = 39。清除文本框 Text3的內(nèi)容 39。設(shè)置焦點(diǎn) End Sub主頁 (1)在窗體上建立一個(gè)標(biāo)簽（ Label1）和三個(gè)命令按鈕 (Command Command2和 Command3) 三個(gè)命令按鈕分別使用訪問鍵 Alt+C、 Alt+H和 Alt+D例 實(shí)現(xiàn)標(biāo)簽的顯示和隱藏 , 以及改變文字的顏色 例 主頁 (2)編寫程序代碼 ? Private Sub Form_Load() Randomize = QBColor(15) 39。背景色 = QBColor(0) 39。文字顏色 = 18 39。字體大小 End Sub Private Sub Command1_Click() 39。“改變文字顏色 ”按鈕 Clr = Int(15 * Rnd) 39。產(chǎn)生隨機(jī)顏色碼 = QBColor(Clr) End Sub Private Sub Command2_Click() 39?！半[藏標(biāo)簽 ”按鈕 = False 39。隱藏標(biāo)簽 End Sub Private Sub Command3_Click() 39。“顯示標(biāo)簽 ”按鈕 = True 39。顯示標(biāo)簽 End Su
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1