在實(shí)例6.2中,Msg = MsgBox(您沒有在文本框中輸入任何內(nèi)容“,48,提示”)賦值語句將MsgBox函數(shù)的值賦給變量Msg.MsgBox函數(shù)的返回值是根據(jù)用戶單擊哪個按鈕而定的。如表6.5所示的是按鈕與對應(yīng)的MsgBox函數(shù)的返回值。
在關(guān)閉應(yīng)用程序時,系統(tǒng)常常會彈出一個消息框來提示用戶是否真的要退出程序,如果戶單擊【是】按鈕,則程序退出,如果用戶單擊的是【否】按鈕,則程序不退出。這里,我們編寫一個程序來模擬上述的情形。
實(shí)例6.3使用消息框2。
在窗體中放置一個按鈕控件,設(shè)置其Caption屬性的值為“退出”,并采用系統(tǒng)默認(rèn)的名稱。雙擊按鈕控件打開【代碼】窗口,將下列代碼添加到Command1_Click事件過程中:
Private Sub Commandl_Click()
Msg=MsgBox(“是否真的退出程序”,37,“提示”)
If msg=7 Then End
End Sub
在該段代碼中,使用了一個If語句來判斷用戶的選擇,如果用戶選擇了【是】按鈕,則執(zhí)行End語句,否則不執(zhí)行任何語句。
運(yùn)行該程序,單擊窗體中的【退出】按鈕,則彈出一個消息框詢問用戶是否退出程序。單擊【否】按鈕,則消息框消失,窗體并不退出。再次運(yùn)行該程序,單擊【是】按鈕,則消息框消失,窗體也隨著被關(guān)閉。
相關(guān)推薦:2010年9月計(jì)算機(jī)等級考試成績查詢時間匯總
2011計(jì)算機(jī)等級考試二級VB考點(diǎn)及習(xí)題匯總
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |