Dim regust As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://coding.dr-ho.org/Example.txt") ' طلب عنوان الملف النصي
Dim respnos As System.Net.HttpWebResponse = regust.GetResponse ' عرفنا استجابه الملف النصي
Dim sr As System.IO.StreamReader = New System.IO.StreamReader(respnos.GetResponseStream) ' عرفنا قرائة الملف النصي
Dim song As String = sr.ReadToEnd ' امر القرائه
TextBox1.Text = song ' عنوان الملف الصوتي
Next
Catch ex As Exception
MsgBox("لم يتم العثور على الملف المطلوب")
End Try