15 lines
491 B
VB.net
15 lines
491 B
VB.net
Public Class Form1
|
|
|
|
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
|
|
Form2.Show()
|
|
Me.Close()
|
|
End Sub
|
|
|
|
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
|
|
|
|
End Sub
|
|
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
|
Me.TopMost = True
|
|
End Sub
|
|
End Class
|