求教:动态添加按钮后如何为该按钮添加事件?
With Forms("窗口1")Dim But As WinForm.ButtonBut = .CreateControl("退出", ControlTypeEnum.Button)But.Text = "退出"But.SetBounds(5, 5, 45, 40) 'SetBounds(x, y, Width, Height)But.TextAlign = ContentAlignment.BottomCenter.AddControl(But)
End With