Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dt As DateTime
        dt = DateTime.Now

        PictureBox1.Image = System.Drawing.Image.FromFile _
          ("C:\Documents and Settings\user\Desktop\L'oraSenzaPari\festa_1.jpg")

        Dim ora As String = dt.ToString("T")
        If ora >= "12.30.00" Then

            System.Diagnostics.Process.Start _
            ("iexplore.exe", "http://www.google.it/")

        End If
    End Sub
End Class