以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助：删除前确认  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=20524)
--  作者：yifan3429
--  发布时间：2012/6/11 15:42:00
--  求助：删除前确认
我想删除前需要弹出对话框 来确认或是取消    要怎样写码 
--  作者：don
--  发布时间：2012/6/11 15:45:00
--  

判断用户单击了哪个按钮：

Dim Result As DialogResult
Result = MessageBox.Show("Visual Basic一点不难，是不是？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    MessageBox.Show("不错，说明你已经认真学习了。","提示")
Else
    MessageBox.Show("好好学习吧，你会认同这个看法的。","提示")
End if

　

本页地址：http://www.foxtable.com/help/topics/0326.htm