Imports WindowsApp1

Public Class ThisDocument

    Dim Форма As Form1

    Public Sub ThisDocument_Startup() Handles Me.Startup
        Форма = New Form1
        Форма.Show()
    End Sub



    Public Sub ThisDocument_Shutdown() Handles Me.Shutdown

    End Sub

    Public Sub ThisDocument_ActivateEvent() Handles Me.ActivateEvent
        Форма.BringToFront()
    End Sub
End Class