VB 弹出是否对话框

来源:百度知道 编辑:UC知道 时间:2024/06/09 09:31:42
我做了一个删除记录的功能,想在删除记录前加一个弹出"是否"对话框,让用户确认是否删除,代码怎么写?谢谢

Dim msg As Integer
msg = MsgBox("确认删除消息么", vbYesNo, "提示")
If msg = vbYes Then
'删除
MsgBox "OK"
End If

If Msgbox("是否删除?",vbyesno+vbinformation,"删除提示")=vbyes then
'在这儿添加你的删除代码
End If