重载确认对话框，点击确定触发一个隐藏按钮事件，点击取消触发一个隐藏按钮事件...

     首先在画面上拖两个Button （btnY，btnN）宽度设为0（注意不要把visible属性设为False）然后调用下边的方法 ，弹出对话框的时候，点【确定】就会进入到btnY的click事件里，点【取消】就进入到btnN的click事件里，
有Updatapanel的时候第一个参数是这个Updatapanel 没有的话第一个参数传Nothing就可以了，第二个参数是当前画面，第三个参数就是要在对话框上显示的提示消息了。

Imports  System.Text
Imports  System.Web.UI
Public   Class MessageBox Class MessageBox
      Public Shared Sub ShowYN()Sub ShowYN(ByVal objUpdate As System.Web.UI.UpdatePanel, ByVal objPage As System.Web.UI.Page, ByVal strMsg As String, ByVal btnY As System.Web.UI.Control, ByVal btnN As System.Web.UI.Control)
        Dim strScript As String = "<script> if (confirm('" & strMsg & "')==true){document.getElementById('" & btnY.ClientID & "').click();}else{document.getElementById('" & btnN.ClientID & "').click();}</script>"
        If objUpdate Is Nothing Then
            '没有updatapanel的情况
            objPage.Page.ClientScript.RegisterStartupScript(objPage.GetType(), "", strScript)
        Else
             '有updatapanel的情况
            ScriptManager.RegisterStartupScript(objUpdate, objPage.GetType(), "updateScript", strScript, False)
        End If
    End Sub
End Class

转载于:https://www.cnblogs.com/budairenqin/archive/2008/06/16/1222815.html