窗体启动之后打开新的窗体 关闭或者隐藏启动窗体

VB.NET 在启动窗体中需要动态启动新的窗体之后关闭或者隐藏自己，一般我们会想到下面的方法

 

Dim frm As New Form1
 frm.Show()
Me.Visible = False
 Me.Hide()

 

这样启动窗体没有隐藏。

 

 

解决方法有三种

 

1. 改变项目的属性，关闭模式设置为当最后一个窗体关闭的时候结束程序。

Dim frm As New Form1
 frm.Show()

Me.Close()

 

2.用一个线程启动新的窗体，不需要更改项目属性。

Private Sub frmStarup_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim thread As New System.Threading.Thread(AddressOf StarupForm) thread.Start() System.Threading.Thread.Sleep(100) Me.Close() End Sub Private Sub StarupForm() Dim frm As New WindowsApplication1.Form1 System.Windows.Forms.Application.Run(frm) End Sub

 

3.新建一个启动项目，启动项目由Main()方法开始。

新建一个ConsoleApplication，更改ConsoleApplication的Application Type为：Window Form Application

 

Module Module1 Sub Main() System.Windows.Forms.Application.EnableVisualStyles() System.Windows.Forms.Application.SetCompatibleTextRenderingDefault(False) Dim frm As New WindowsApplication1.Form1 System.Windows.Forms.Application.Run(frm) End Sub End Module