
vb里面怎么把弹出的窗口(确定,取消)改成别的?联系我q2547756105
提示该问答中所提及的号码未经验证,请注意甄别。
2个回答
展开全部
只需改变MsgBox函数的第二个参数即可,比如
x = MsgBox("只显示“确定”按钮", vbOKOnly)
x = MsgBox("显示“确定”和“取消”按钮", vbOKCancel)
x = MsgBox("显示“中止”、“重试”和“忽略”按钮", vbAbortRetryIgnore)
x = MsgBox("显示“是”、“否”和“取消”按钮", vbYesNoCancel)
x = MsgBox("显示“是”和“否”按钮", vbYesNo)
x = MsgBox("显示“重试”和“取消”按钮", vbRetryCancel)
也可以用数字:
x = MsgBox("只显示“确定”按钮", 0)
x = MsgBox("显示“确定”和“取消”按钮", 1)
x = MsgBox("显示“中止”、“重试”和“忽略”按钮", 2)
x = MsgBox("显示“是”、“否”和“取消”按钮", 3)
x = MsgBox("显示“是”和“否”按钮", 4)
x = MsgBox("显示“重试”和“取消”按钮", 5)
请注意,根据点击按钮的不同,返回值也是各不相同的,比如:
If x = vbOK Then '点了“确定”按钮
If x = vbCancel Then '点了“取消”按钮
If x = vbAbort Then '点了“中止”按钮
If x = vbRetry Then '点了“重试”按钮
If x = vblgnore Then '点了“忽略”按钮
If x = vbYes Then '点了“是”按钮
If x = vbNo Then '点了“否”按钮
同样,也可以用数字:
If x = 1 Then '点了“确定”按钮
If x = 2 Then '点了“取消”按钮
If x = 3 Then '点了“中止”按钮
If x = 4 Then '点了“重试”按钮
If x = 5 Then '点了“忽略”按钮
If x = 6 Then '点了“是”按钮
If x = 7 Then '点了“否”按钮
x = MsgBox("只显示“确定”按钮", vbOKOnly)
x = MsgBox("显示“确定”和“取消”按钮", vbOKCancel)
x = MsgBox("显示“中止”、“重试”和“忽略”按钮", vbAbortRetryIgnore)
x = MsgBox("显示“是”、“否”和“取消”按钮", vbYesNoCancel)
x = MsgBox("显示“是”和“否”按钮", vbYesNo)
x = MsgBox("显示“重试”和“取消”按钮", vbRetryCancel)
也可以用数字:
x = MsgBox("只显示“确定”按钮", 0)
x = MsgBox("显示“确定”和“取消”按钮", 1)
x = MsgBox("显示“中止”、“重试”和“忽略”按钮", 2)
x = MsgBox("显示“是”、“否”和“取消”按钮", 3)
x = MsgBox("显示“是”和“否”按钮", 4)
x = MsgBox("显示“重试”和“取消”按钮", 5)
请注意,根据点击按钮的不同,返回值也是各不相同的,比如:
If x = vbOK Then '点了“确定”按钮
If x = vbCancel Then '点了“取消”按钮
If x = vbAbort Then '点了“中止”按钮
If x = vbRetry Then '点了“重试”按钮
If x = vblgnore Then '点了“忽略”按钮
If x = vbYes Then '点了“是”按钮
If x = vbNo Then '点了“否”按钮
同样,也可以用数字:
If x = 1 Then '点了“确定”按钮
If x = 2 Then '点了“取消”按钮
If x = 3 Then '点了“中止”按钮
If x = 4 Then '点了“重试”按钮
If x = 5 Then '点了“忽略”按钮
If x = 6 Then '点了“是”按钮
If x = 7 Then '点了“否”按钮
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询