[?]DownloadStringAsync - Error

[coladose]

Guten Morgen,

Seid ein paar Stunden macht mich eine doch recht einfach Funktion total verrückt, da ich nicht verstehe, wieso sie nicht geht

Hier ist sie:

PHP Code:

 Dim WithEvents wClient As New WebClient
Dim Url As Uri

Try
                Url = New Uri("http://floatstylez.fm")
                src = wClient.DownloadStringAsync(Url)
            Catch L As Exception
                MsgBox(L.Message)
            End Try 


Es ist alles so, wie es sein sollte (Aus meiner Sicht), doch VS ist da anderer Meinung
-->"Der Ausdruck ergibt keinen Wert"

Ich hoffe hier kann mir jemand helfen, das Problemchen zu beseitigen
Danke,

coladose

[Kraizy​]

PHP Code:

Dim WithEvents wClient As New WebClient
Dim url As Uri

Private Sub Form_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   url = New Uri("http://floatstylez.fm")
   wClient.DownloadStringAsync(url)
   AddHandler wClient.DownloadStringCompleted, AddressOf DownloadComplete
End Sub

Public Sub DownloadComplete(ByVal sender As Object, ByVal e As DownloadStringCompletedEventArgs)
   Debug.Print(e.Result)
End Sub