VB如何实现执行某程序，弹出对话框选择是否要执行，点击是则执行，否则不执行
答案:2 悬赏:50 手机版
解决时间 2021-03-31 14:24
- 提问者网友：溺爱和你
- 2021-03-31 06:44
VB如何实现执行某程序，弹出对话框选择是否要执行，点击是则执行，否则不执行
最佳答案
- 五星知识达人网友：拾荒鲤
- 2021-03-31 07:33
你只要用一个if语句判断msgbox返回的是“是”（vbTure）还是“否”（vbNo）就行了。如果是“是”就不用管它，代码会自动往下执行，如果是“否”就End，代码如下：
If MsgBox("是否执行？", 4 + 32, "提示") = vbNo Then
End
End If
If MsgBox("是否执行？", 4 + 32, "提示") = vbNo Then
End
End If
全部回答
- 1楼网友：往事埋风中
- 2021-03-31 07:41
MSGBOX "是否执行？", VbOKCancel,"提示"
这个就会弹出一个对话框，VbOKCancel决定了这个对话框有个确定按钮，有个取消按钮
还有下面这些可以选择
vbOKOnly 0 只显示“确定”按钮
VbOKCancel 1 显示“确定”和“取消”按钮
VbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略” 按钮
VbYesNoCancel 3 显示“是”、“否”和“取消”按钮
VbYesNo 4 显示“是”和“否”按钮
VbRetryCancel 5 显示“重试”和“取消”按钮
VbCritical 16 显示“关键信息”图标
VbQuestion 32 显示“警告询问”图标
VbExclamation 48 显示“警告消息”图标
VbInformation 64 显示“通知消息”图标追问MSGBOX "是否执行？", VbOKCancel,"提示"
为什么点击取消也执行追答Dim x As VbMsgBoxResult
dim a as integer
x = MsgBox("是否执行？", vbOKCancel, "提示")
If x = 1 Then
a = 1
Else
a = 2
End If
这个就会弹出一个对话框，VbOKCancel决定了这个对话框有个确定按钮，有个取消按钮
还有下面这些可以选择
vbOKOnly 0 只显示“确定”按钮
VbOKCancel 1 显示“确定”和“取消”按钮
VbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略” 按钮
VbYesNoCancel 3 显示“是”、“否”和“取消”按钮
VbYesNo 4 显示“是”和“否”按钮
VbRetryCancel 5 显示“重试”和“取消”按钮
VbCritical 16 显示“关键信息”图标
VbQuestion 32 显示“警告询问”图标
VbExclamation 48 显示“警告消息”图标
VbInformation 64 显示“通知消息”图标追问MSGBOX "是否执行？", VbOKCancel,"提示"
为什么点击取消也执行追答Dim x As VbMsgBoxResult
dim a as integer
x = MsgBox("是否执行？", vbOKCancel, "提示")
If x = 1 Then
a = 1
Else
a = 2
End If
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯