使用CodeDom编写VB.NET Windows窗体应用程序

Question

如何通过CodeDom编写VB.NET Windows窗体应用程序？

我已经尝试了所有的东西,我得到的最接近的是下面的代码,首先显示命令提示窗口不好,然后显示表格等一秒钟,一切都消失了.还有另一种正确的方法吗？非常感谢一个例子.

Public Module MyApp
    Public Sub main()
        Dim NewForm As New System.Windows.Forms.Form
        NewForm.Name = "Form1"
        NewForm.Text = "Form1"
        NewForm.Width = 300
        NewForm.Height = 300
        NewForm.FormBorderStyle = Windows.Forms.FormBorderStyle.FixedSingle
        NewForm.ControlBox = True
        NewForm.MaximizeBox = False
        NewForm.MinimizeBox = True
        NewForm.Show()
    End Sub
End Module

Answer 1

它不起作用,因为您没有调用Application.Run().没有它就没有什么能阻止主线程,它会退出,这就是程序和表单的结束. NewForm.ShowDialog()是另一个廉价的修复程序.

适当的咒语是:

Imports System.Windows.Forms

Public Module MyApp
    Public Sub Main()
        Application.EnableVisualStyles()
        Application.SetCompatibleTextRenderingDefault(False)
        Dim NewForm As New Form
        '' Set properties
        ''...
        Application.Run(NewForm)
    End Sub
End Module

要停止显示控制台窗口,您需要更改EXE类型.Project + Properties,Application选项卡,将"Application type"设置从Console Application更改为Windows Forms Application.对于CodeDom,您需要设置CompilerOptions以指定/ target.