6.1.2 消息框

　　MsgBox函數(shù)用來產(chǎn)生一個消息框。消息框用來顯示簡短的消息，并要求用戶作出一定的響應(yīng)。例如，報告操作錯誤或向用戶提示信息�？赐赀@些消息以后，可選取一個按鈕來關(guān)閉該對話框。

　　創(chuàng)建該消息框的代碼如下：

　　Msg=MsgBox(您沒有在文本框中輸入任何內(nèi)容“48”提示)。

　　這里我們通過編寫一個程序，來講解如何在程序中使用MsgBox函數(shù)創(chuàng)建消息框。

　　實例6.2使用消息框

　　這個程序包含一個文本框和一個按鈕，在文本框中輸入內(nèi)容后單擊按鈕，則所輸入的內(nèi)容就顯示在窗體中;如果在文本框中沒有輸入任何內(nèi)容，則單擊按鈕后會彈出一個提示框，告訴用戶沒有在文本框中輸入任何內(nèi)容，如圖6.4所示。下面是編制這個小程序的具體過程。

　　首先，在窗體中放置一個文本框控件，設(shè)置它的Text屬性的值為空，再放置一個按鈕控件，設(shè)置它的Caption屬性的值為“確定”.文本框與按鈕的名稱均使用系統(tǒng)默認(rèn)的名稱。雙擊按鈕控件，打開代碼窗口，為按鈕的Click事件編寫如下代碼：

　　Private Sub Commandl_Click()

　　If Text1.Text=“Then

　　Msg = MsgBox(“您沒有在文本框中輸入任何內(nèi)容”，48，“提示”)

　　Else

　　Print Textl.Text

　　End If

　　End Sub

　　在上面的程序段中，使用了一個分支結(jié)構(gòu)來判斷文本框中是否輸入了內(nèi)容。運行該程序，直接單擊【確定】按鈕，則彈出如圖5.4所示的消息樞。再次運行程序，在文本框中輸入內(nèi)容后，單擊【確定】按鈕，則不會出現(xiàn)消息框，且在窗體中顯示用戶輸入的內(nèi)容。

　　2010年9月計算機(jī)等級考試成績查詢時間匯總

　　2011計算機(jī)等級考試二級VB考點及習(xí)題匯總

　　2011年計算機(jī)等級考試二級VB復(fù)習(xí)指導(dǎo)匯總

　　2011年上半年計算機(jī)等級考試報名時間匯總