vb点击MsgBox窗口上的“是”“否”按钮分别执行不同操作?
我知道下面这个代码可以在MsgBox上加是否按钮:MsgBox("现在打开百度",vbYesNo,"提示")=vbYes。那么怎样实现点击msgbox窗口上的“是”按钮后...
我知道下面这个代码可以在MsgBox上加是否按钮:
MsgBox("现在打开百度", vbYesNo, "提示") = vbYes。
那么怎样实现点击msgbox窗口上的“是”按钮后,执行text1=100,点击“否”按钮后,执行text1=200? 展开
MsgBox("现在打开百度", vbYesNo, "提示") = vbYes。
那么怎样实现点击msgbox窗口上的“是”按钮后,执行text1=100,点击“否”按钮后,执行text1=200? 展开
展开全部
Private Sub Command1_Click()
Dim i As Integer
i = MsgBox("现在打开百度", vbYesNo, "提示")
If i = vbYes Then Text1.Text = 100
If i = vbNo Then Text1.Text = 200
End Sub
Dim i As Integer
i = MsgBox("现在打开百度", vbYesNo, "提示")
If i = vbYes Then Text1.Text = 100
If i = vbNo Then Text1.Text = 200
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如果MSGBOX(“退出”,vbYesNo + vbInformation用来“退出”)= vbYes结束
结束,如果
结束,如果
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
if MsgBox("现在打开百度", vbYesNo, "提示") = vbYes then
text1=100
else
text1=200
endif
你连基本语句都不会,靠你那几百分到处要代码做个外挂,有啥用?显摆?
text1=100
else
text1=200
endif
你连基本语句都不会,靠你那几百分到处要代码做个外挂,有啥用?显摆?
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询