我的代码是:DIM X AS NEW BUTTON
X。TEXT=“NEWBUTTON”
X。SIZE=NEW SIZE(100,40)
X。LOCATION=NEW POINT
ME。CONTROLS。ADD(X)
书上说要加CLICK事件要加:
ADDHANDLER X。CLICK,ADDRESSOF ME。CLICK_HANDLER
可我用了不行这是为什么还请高手多多指点
小弟我在这里先谢谢了!!!
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim X As New Button
X.Text = "NEWBUTTON"
X.Size = New Size(100, 40)
X.Location = New Point
Me.Controls.Add(X)
AddHandler X.Click, AddressOf Me.CLICK_HANDLER
End Sub
Private Sub CLICK_HANDLER(ByVal sender As System.Object, ByVal e As System.EventArgs)
MsgBox("You click me!")
End Sub