关于vs2005中子窗体的控件事件响应问题

[kongkongshan]

在父窗体中新建一个子窗体，动态添加button控件和textbox控件到子窗体上，想实现的功能是点击button，判断textbox内容不为空，则对textbox内容进行后续处理。问题是，如何激发button控件的click事件，代码该怎样写呢？

已完成的代码如下：

Private Sub ShowNewForm(ByVal sender As Object, ByVal e As EventArgs) Handles NewToolStripMenuItem.Click, NewToolStripButton.Click, NewWindowToolStripMenuItem.Click
' 创建此子窗体的一个新实例。
Dim ChildForm As New System.Windows.Forms.Form
' 在显示该窗体前使其成为此 MDI 窗体的子窗体。
ChildForm.MdiParent = Me

m_ChildFormNumber += 1
ChildForm.Text = "新建数据库" & m_ChildFormNumber

ChildForm.Show()
‘添加button

Dim btn1 As New Button

Dim btncount As Integer
btncount += 1
ChildForm.Controls.Add(btn1)

With btn1
.Left = 40
.Top = 230
'.Width = 2200
'.Height = 675
.Text = "确定" + btncount.ToString

.Visible = True
End With

添加textbox代码略

end sub

该如何激发button的click事件呢？望各位大虾指点。

[kongkongshan]

谢谢楼上，现在还有一个问题，就是在btnclick事件中，对于子窗体中添加的动态控件textbox（名称为txt1)会提示“txt1未声明名称”，这个该怎么解决的？

[taick]

先声明控件再添加事件

[北京的雾霾天]

添加按钮

       Dim btn1 As New Button

        Dim btncount As Integer
        btncount += 1
        Me.Controls.Add(btn1)

        With btn1
            .Left = 40
            .Top = 230
            '.Width = 2200 
            '.Height = 675 
            .Text = "确定" + btncount.ToString
            AddHandler .Click, AddressOf btnclick
            .Visible = True
        End With

click事件

    Private Sub btnclick(ByVal sender As System.Object, ByVal e As System.EventArgs)
        MsgBox("a")
    End Sub