Non Tray ma Try ...

Qualcosa come questo

codice:
        Dim sourceString As String = ""


        Try
            sourceString = New WebClient().DownloadString("http://tycho.usno.navy.mil/cgi-bin/timer.pl")
        Catch ex As WebException
            Console.WriteLine(ex.Message)
        End Try


        If (sourceString.Length > 0) Then
            Console.WriteLine(sourceString.Substring(sourceString.IndexOf(":") - 2, 8))
        End If
Per il Try studia da qui

http://msdn.microsoft.com/it-it/library/fk6t46tz.aspx

P.S. Se continui a tentare di scrivere codice partendo dal VB6 senza fermarti a studiare seriamente il VB.NET potresti avere tanti problemi e perdere tanto tempo ...