[مبتدئ]

كود :

Public Class Class1

    Private objForm As Form1

    Public Sub Show()
        For Each selProcess As Process In Process.GetProcesses
            If selProcess.ProcessName = "IDman" Then
                Exit For
            End If
        Next
        objForm = New Form1

        objForm.Show()
    End Sub
End Class

هذا الكود لى انذا وجد IDman مفتوح Form1 تظهر