Sub Command1_Click ()
    main.Enabled = True
    tools.Enabled = True
    main.Show
    about.Hide
End Sub

