MsgBox

用于显示对话框信息并等待用户选择按钮。

格式
MsgBox 信息$ [, 按钮的类型] [, 标题$] [, 接收结果的整数]

参数

信息$
显示的信息
按钮的类型
指定相关数值或表达式。相关数值是指指定显示按钮数量和类型、图标样式、按钮标题等值的合计值。Epson RC+里包括事先确定用于该参数的常数,并使用下表所示的值。可省略。

常数 含义
MB_OK 0 仅显示[OK]按钮
MB_OKCANCEL 1 显示[OK]和[取消按钮]
MB_ABORTRETRYIGNORE 2 显示[中止]、[重试]、[无视]按钮
MB_YESNOCANCEL 3 显示[是]、[否]、[取消按钮]
MB_YESNO 4 显示[是]、[否]按钮
MB_RETRYCANCEL 5 显示[重试]和[取消按钮]
MB_ICONSTOP 16 Stop符号
MB_ICONQUESTION 32 “?”标记
MB_ICONEXCLAMATION 64 “!”标记
MB_DEFBUTTON1 0 第1个按钮为默认
MB_DEFBUTTON2 256 第2个按钮为默认
标题$
指定在对话框标题栏上显示的字符。可省略。
接收结果的整数
指定接收表示用户选择值(整数)的变量。Epson RC+里包括事先确定用于该参数的常数。下表所示为由该参数返回的值。可省略。
常数 含义
IDOK 1 选择[OK]按钮。
IDCANCEL 2 选择[取消]按钮。
IDABORT 3 选择[中止]按钮。
IDRETRY 4 选择[重试]按钮。
IDYES 6 选择[是]按钮。
IDNO 7 选择[否]按钮。

说明
MsgBox用于自动对信息执行格式化。要设为空白状态时,对信息使用CRLF。请参阅下例。

参阅
InputBox

MsgBox使用示例
下例所示为向用户显示是否继续作业的确认信息框。信息框中显示[是]和[否]2个按钮。也显示“?”显标记图标。如果用户选择按钮并返回MsgBox,则可以再考量答复。如果选择“否”,则利用Quit命令结束所有任务。

Function msgtest
  String msg$, title$
  Integer mFlags, answer

  msg$ = Chr$ (34) + "Operation complete" + Chr$ (34)  + CRLF
  msg$ = msg$ + "Ready to continue?"
  title$ = "Sampl Application"
  mFlags = MB_YESNO + MB_ICONQUESTION
  MsgBox msg$, mFlags, title$, answer
  If answer = IDNO then
    Quit All
  EndIf
Fend

下述画面所示为由上述代码生成的信息框。

限制事项
如果参数的msg$和title$中包含半角逗号“,”,将无法正确显示字符串。请使用不含半角逗号的字符串。