可以使用 MsgBox 函数来设置选择项，具体的语法如下：
MsgBox(prompt, buttons, title)
其中，prompt 是要显示的消息内容，buttons 是按钮的样式和功能，title 是对话框的标题。
常见的 buttons 参数取值为：
0：仅显示 OK 按钮。
1：显示 OK 和取消按钮。
2：显示中止、重试和忽略按钮。
3：显示是、否和取消按钮。
4：显示是和否按钮。
5：显示重试和取消按钮。
6：显示帮助和 OK 按钮。
示例代码如下，其中显示了是和否的选择项：
云服务器
物理服务器
虚拟主机
跨境电商服务器result = MsgBox("是否继续操作？", 4, "提示")
If result = 6 Then
' 用户选择了是
MsgBox "用户选择了是"
Else
' 用户选择了否或关闭对话框
MsgBox "用户选择了否"
End If
以上代码会显示一个提示对话框，提示用户选择是否继续操作。如果用户选择了“是”，则会显示“用户选择了是”的消息框；如果用户选择了“否”或者关闭了对话框，则会显示“用户选择了否”的消息框。
辰迅云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>
推荐阅读： VBS中FileSystemObject对象详解