msgbox "内容",16,"标题"
msgbox ("内容" As String,[MsgboxStyle As VbMsgboxStyle],["标题" As String]) [As VbMsgboxResult]vbs也一样