[rnmr]

جرب هذا

كود :

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

   PictureBox1.Visible = False
   Label1.Visible = False

   If VProject > My.Settings.VProject Then
       Label1.Text = "Download The New Version"
       PictureBox1.Visible = True
       Label1.Visible = True
   Else
       ScreamAct.ShowDialog()
       Application.ExitThread()
   End If

End Sub