Læse fra fil og bruge det

Denne lille rutine åbner filen "C:\info.txt" og smider den første linie ind i label1.
"C:\info.txt" skal eksistere og der skal stå noget i den ellers får du en  runtime error.

Private Sub Command1_Click()
  Dim strFilNavn As String
  Dim strData As String
  Dim intFF As Integer
  intFF = FreeFile
  strFilNavn = "C:\info.txt"
  Open strFilNavn For Input As #intFF
    Line Input #intFF, strData
  Close #intFF
  Label1.Caption = strData
End Sub

Lige en tilføjelse :O)

Jeg ved ikke lige helt hvad det er du vil med en webbrowser...men her er det hvis det er til et browservindue i din aplikation:

webrowser1.navigate(strData)

Eller hvis det er et selvstændigt browservindue du vil ha så er det som følger:

Shell ("explore.exe " + strData)

Tubber

Tak for point