16,718
社区成员
发帖
与我相关
我的任务
分享 Private Sub ButtonClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
' 自己需要处理的代码
End Sub
Dim objButton As New Button
objButton.Visible = True
objButton.Location = New Point(0, 0)
objButton.Size = New Size(200, 50)
Me.Controls.Add(objButton)
AddHandler objButton.Click, AddressOf ButtonClick