[Dev Saeed]

إذًا المقصود هو رقم (2) في الرد الذي ذكرته 

حسنًا

هكذا : ( يتم وضع الكود التالي داخل الزر في Form1 ، قمت بوضعه في Button1 )

كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click


       Dim process_name As String = "notepad"


       Process.Start(process_name)


       Me.Hide()

KeepWaiting:

       If (Process.GetProcessesByName(process_name).Length > 0) Then
           GoTo KeepWaiting
       Else
           GoTo EndIt
       End If

EndIt:
       Form2.Show()

   End Sub

ملاحظة: سيقوم بفتح برنامج المفكرة كمثال ، ( هل الوافي الذهبي لازال حيًا ؟ )،  بالإمكان وضع اسم العملية الخاصة ببرنامج الوافي في التغير process_name .

( اسم العملية يتم إجاده عن طريق "مدير المهام - TaskManager"  عند فتح أي برنامج)