Supongo que conoces esta API, yo la descubrí hace unos dias y es cojonu...
Public Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Yo la estoy utilizando para comprobar si tengo actualizada la versión de mi aplicación bajando un archivo de una URL y leyendo su contenido.
Bajar un pequeño archivo es cuestión de milisegundos, entonces enseñas el texto donde tu quieras. Evidentemente no tiene porque ser TXT puede ser una pequeña imagen, un html, la decisión es tuya.
Dim Problema As Boolean, FicheroURL As String
FicheroURL = "http://www.dominio.com/pagina.htm"
Problema = URLDownloadToFile(0, FicheroURL, App.Path & "\TuArchivo.txt" , 0, 0)
If Not Problema Then
' Procesar TuArchivo.txt
Else
' No pudo descargarlo
End If