Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Form2.Visible = False Then
Form2.Show()
Button1.Text = "Hide"
Else
Form2.Close()
Button1.Text = "Show"
End If
End Sub