msgbox函數(shù)用法講解(編輯修改稿)
2025-08-10 16:20 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 擊“取消”按鈕效果相同。若消息框中有“幫助”按鈕，則提供相關(guān)的幫助信息。(3)如果要輸入多個(gè)參數(shù)并省略中間的某些參數(shù)，則必須在相應(yīng)位置加入逗號(hào)分界符。示例(1)使用 MsgBox 函數(shù)，在具有“是”及“否”按鈕的對(duì)話框中顯示一條嚴(yán)重錯(cuò)誤信息。示例中的缺省按鈕為“否”，MsgBox函數(shù)的返回值視用戶按哪一個(gè)鈕而定。，其中有一個(gè)幫助主題代碼為1000。Dim Msg,Style,Title,Help,Ctxt,Response,MyStringMsg=Do you want to continue ? ’定義消息文本Style = vbYesNo + vbCritical + vbDefaultButton2 39。 定義按鈕Title = MsgBox Demonstration 39。 定義標(biāo)題文本Help = 39。 定義幫助文件Ctxt = 1000 39。 定義幫助主題Response = MsgBox(Msg, Style, Title, Help, Ctxt)If Response = vbYes Then 39。 用戶按下“是” MyString = Yes 39。 完成某操作Else 39。 用戶按下“否” MyString = No 39。 完成某操作End If(2)只顯示某消息MsgBox “Hello!”(3)將消息框返回的結(jié)果賦值給變量Ans=MsgBox(“Continue?”,vbYesNo)If MsgBox(“Continue?”,vbYesNo)vbYes Then Exit Sub(4)使用常量的組合，賦值組Config變量，并設(shè)置第二個(gè)按鈕為缺省按鈕Config=vbYesNo+vbQuestion+vbDefaultButton2(5)若要在消息中強(qiáng)制換行，可在文本中使用vbCrLf(或vbNewLine)常量，用amp。加空格與字符隔開(kāi)。如MsgBox “This is the first line.” amp。 vbNewLine amp。 “Second line.”(6)可以在消息框中使用vbTab常量插入一個(gè)制表符。下面的過(guò)程使用一個(gè)消息框來(lái)顯示55單元格區(qū)域中的所有值，用vbTab常量分隔列并使用vbCrLf常量插入一個(gè)新行。注意在MsgBox函數(shù)最多只顯示1024個(gè)字符，因此限制了可顯示的單元格數(shù)。Option ExplicitSub ShowRangeValue()Dim Msg As StringDim r As Integer, c As IntegerMsg = For r = 1 To 5For c = 1 To 5 Msg = Msg amp。 Cells(r, c) amp。 vbTabNext cMsg = Msg amp。 vbCrLfNext rMsgBox MsgEnd Sub(7)在消息框語(yǔ)句中運(yùn)用工作表函數(shù)以及設(shè)置
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1