VB 2010 （68）用 Sub Main启动Windows应用程序

Application 类

https://docs.microsoft.com/zh-cn/dotnet/api/system.windows.forms.application?redirectedfrom=MSDN&view=netcore-3.1

 

命名空间:System.Windows.Forms

程序集:System.Windows.Forms.dll

提供 static 方法和属性以管理应用程序，例如启动和停止应用程序、处理 Windows 消息的方法和获取应用程序信息的属性。 此类不能被继承。

注解

Application 类具有启动和停止应用程序和线程以及处理 Windows 消息的方法，如下所示：

• Run 在当前线程上启动应用程序消息循环，并且可以选择使窗体可见。

• Exit 或 ExitThread 停止消息循环。

• DoEvents 在程序处于循环过程中处理消息。

• AddMessageFilter 将消息筛选器添加到应用程序消息泵来监视 Windows 消息。

• IMessageFilter 允许在调用事件处理程序之前停止引发事件，或执行特殊操作。

此类具有 CurrentCulture 和 CurrentInputLanguage 属性，可获取或设置当前线程的区域性信息。

不能创建此类的实例。

 

1.在Windows应用程序中加入一个Module模块，在模块在加入代码

Module Module1
    Sub main()
        Dim f As New Form1
        Application.Run(f)
    End Sub
End Module

2.在项目属性中取消“启用应用程序框“