Развертывание уже запущенного приложения - Visual Basic .NET

Формулировка задачи:

Подскажите, как правильно сделать. При запуске приложение - свернуто в трей, как при повторном запуске не открывать дубликат, а выполнить к примеру me.show

Решение задачи: «Развертывание уже запущенного приложения»

textual
                            Листинг программы 
                        

                              Private Sub MyApplication_StartupNextInstance(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupNextInstanceEventArgs) Handles Me.StartupNextInstance
         ' StartupNextInstance: возникает при запуске приложения, допускающего одновременное выполнение только одного экземпляра, если это приложение уже активно. 
            e.BringToForeground = True
            My.Application.MainForm.Visible = True
        End Sub
                        