Не работи без New. Ето така проработи, но нe скрива предната форма, когато се появи новата форма:

В Module1 пиша:

Module Module1
Public StarataForma1 As New Form1
Public StarataForma2 As New Form2
'note: тук добавям и други форми, ако е нужно …

Sub main()

StarataForma1.ShowDialog()
‘това ми е началната форма, която се отваря
‘при стартиране на програмата

End Sub
End Module





Във Form1 правя бутон със следното съдържание:

Public Class Form1
Inherits System.Windows.Forms.Form

[Windows Form Designer generated code]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim StarataForma1 As New Form1
StarataForma1.Hide()
'Това скрива началната форма

Dim StarataForma2 As New Form2
StarataForma2.ShowDialog()
'А това отваря новата форма

End Sub
End Class






Във Form2 правя бутон със следното съдържание:

Public Class Form1
Inherits System.Windows.Forms.Form

[Windows Form Designer generated code]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim StarataForma2 As New Form2
StarataForma2.Hide()
'Това скрива настоящата форма

Dim StarataForma1 As New Form1
StarataForma1.ShowDialog()
'А това отваря началната форма

End Sub
End Class


Как да се скрие предната форма след като се появи новата форма обаче?