asp.net (VB)にて、Webアプリを開発しています。

メッセージダイアログを表示するクラスを作成しましたが表示されません。

作成したクラスの概要を説明すると。

①まず、Buttonクラスの派生クラスを作成
②このクラスのインスタンス生成時、
   OnClientClickプロパティに、ダイアログを表示するメッセージをセット
③このクラスに、『 OnClickメソッドを呼び出す 』 メソッドを作成

④このクラスのメソッドを呼ぶことで、ダイアログが表示されることを期待していますが、
表示されません。

以下はプログラムコードです。
このプログラムでは、Button1をクリックした際に、
ダイアログを表示するメソッドを呼び出しています。

'**************************************
'*ダイアログを表示するクラス
'**************************************
Public Class ButtonEx

    Inherits Button

    Public Sub New()
        Me.OnClientClick = "return　confirm('100件以上存在します。続行しますか？')"
    End Sub

    Public Sub DoClick()
        Me.OnClick(New EventArgs)
    End Sub
End Class

'**************************************
'*Webフォーム
'**************************************
Public Class WebForm1
    Inherits System.Web.UI.Page

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click

        Dim dialog As ButtonEx

        dialog = New ButtonEx

        dialog.DoClick()

    End Sub
End Class

最終的には、ダイアログに表示するメッセージなどなどの必要なパラメータを、
引数、プロパティにするようにチューニングし、仕上げるつもりですが。

まずは、第一歩として、試験的に上記のような簡単なクラスを作成しましたが動きません。