[ابراهيم ايبو]

السلام عليكم ورحمة الله وبركاته
اخي الكريم عبد الله على اعتبار ان البرنامج يثبت عادة في مجلد ProgramFiles وبالتالي سيتم البحث في المسار فأن وجد الاسم ستكون الرسالة موجود والا فلا

كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       If (Not System.IO.Directory.Exists(My.Computer.FileSystem.SpecialDirectories.ProgramFiles & "\MyAppName\MyAppName.exe")) Then
           MsgBox("الكمبيوتر لا يمتلك برنامج \MyAppName\MyAppName.exe")
       Else
           MsgBox("الكمبيوتر يمتلك برنامج \MyAppName\MyAppName.exe")
       End If
   End Sub