可以使用 MsgBox 函数来设置选择项,具体的语法如下:
MsgBox(prompt, buttons, title)
其中,prompt 是要显示的消息内容,buttons 是按钮的样式和功能,title 是对话框的。
常见的 buttons 参数取值为:
- 0:仅显示 OK 按钮。
- 1:显示 OK 和取消按钮。
- 2:显示中止、重试和忽略按钮。
- 3:显示是、否和取消按钮。
- 4:显示是和否按钮。
- 5:显示重试和取消按钮。
- 6:显示帮助和 OK 按钮。
示例代码如下,其中显示了是和否的选择项:
```vbscript
result = MsgBox("是否继续操作?", 4, "提示")
If result = 6 Then
' 用户选择了是
MsgBox "用户选择了是"
Else
' 用户选择了否或关闭对话框
MsgBox "用户选择了否"
End If
```
以上代码会显示一个提示对话框,提示用户选择是否继续操作。如果用户选择了“是”,则会显示“用户选择了是”的消息框;如果用户选择了“否”或者关闭了对话框,则会显示“用户选择了否”的消息框。