如何在控制台应用程序中以动态创建的形式 window 动态创建控件

Question

使用 VB.NET 2010 有什么方法可以在控制台应用程序中以动态创建的形式 window 动态创建控件，而无需使用任何额外的附加组件？如果是这样，你能为这些控件做事件处理程序吗？

Answer 1

由于您已经有一个显示表单，因此您已经有了对 System.Windows.Forms 的引用。您可以使用与为表单添加控件类似的方式向表单添加控件。要连接事件，您可以使用 AddHandler 语句：

Imports System.Windows.Forms
Module Module1

    Private m_frmTest As Form = Nothing

    Sub Main()

        Dim frmTest As New Form()

        Dim btnTest As New Button()
        btnTest.Text = "Test"
        btnTest.Top = 100
        btnTest.Left = 100

        AddHandler btnTest.Click, AddressOf SimpleButtonClickHandler

        frmTest.Controls.Add(btnTest)

        frmTest.ShowDialog()            

    End Sub

    Private Sub SimpleButtonClickHandler()

        MsgBox("Test")

    End Sub

End Module

如何在控制台应用程序中以动态创建的形式 window 动态创建控件

How to dynamically create controls in a dynamically created form window in console application

vb.net

vb.net-2010