Imports System.Net
Imports System.IO
 
Public Class Form1
    Inherits System.Windows.Forms.Form
 
    ' Internet-Datei auslesen
    Private Function inetReadFile(ByVal sURL As String) As String
        Dim sBuffer As String
 
        ' WebRequest
        Dim oRequest As WebRequest = WebRequest.Create(sURL)
 
        ' GET-Methode (wir wollen etwas abholen :-)
        oRequest.Method = "GET"
 
        ' Antwort auf unsere Anfrage abholen
        Dim oResponse As WebResponse = oRequest.GetResponse()
 
        ' Datenstrom auslesen
        Dim oStream As New StreamReader(oResponse.GetResponseStream())
        sBuffer = oStream.ReadToEnd()
        oStream.Close()
 
        ' Beenden
        oResponse.Close()
 
        ' Inhalt zurückgeben
        Return sBuffer
    End Function
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        txt.Text = inetReadFile("http://193.176.151.43/muh.txt")
    End Sub