Module Module1
Dim myForm As New Form1
Sub Main()
myForm.Show()
'myForm.Hide()
Beep()
Console.ReadLine()
End Sub
End Module
Form1 Code (VB.NET)
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
Console.WriteLine("Hide")
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Console.WriteLine("Hide")
End Sub
End Class
Public Class Form1
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Console.WriteLine("Hide")
Timer1.Enable = False
End Sub
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Timer1.Start()
'Me.Hide()
End Sub
End Class
Module Module1
Sub Main()
Dim zs As New Form1
zs.Show()
'zs.Hide()
Console.ReadLine()
End Sub
End Module