确定与取消按钮
发布网友
发布时间:2022-04-20 17:32
我来回答
共1个回答
热心网友
时间:2023-07-11 06:51
Dim Msg,Style,Title,Response
Msg="Do you want to continue ?" ’定义消息文本
Style = vbYesNo + vbCritical + vbDefaultButton2 ' 定义按钮
Title = "MsgBox Demonstration" ' 定义标题文本
'弹出选择框
Response = MsgBox(Msg, Style, Title)
If Response = vbYes Then ' 用户按下“是”
Conn.execute"update table set ........." '选择是就执行这一行代码
Else ' 用户按下“否”
'选否不执行这一行
End If
----------------
Response = MsgBox(Msg, Style, Title)
这句执行到了没有?