Italian libreria DownloadManager

Dim DownloadManager1 As DownloadManager

Sub ScaricaFile(nomefile As String)
    Dim DownloadManagerRequest1 As DownloadManagerRequest
    DownloadManagerRequest1.Initialize(DOWNLOAD_ADDRESS)
    DownloadManagerRequest1.Description="DownloadManager demo"
    DownloadManagerRequest1.DestinationUri="file://"&File.Combine(File.DirInternal, DOWNLOAD_FILENAME)
    DownloadManagerRequest1.Title=DOWNLOAD_FILENAME
    DownloadManagerRequest1.VisibleInDownloadsUi=True
    DownloadId=DownloadManager1.Enqueue(DownloadManagerRequest1)
End Sub

DownloadId=DownloadManager1.Enqueue(DownloadManagerRequest1)

Dim comando As String = "https://www.miosito.it/app/elenco.txt"
Dim res As String = ""
Dim j As HttpJob
j.Initialize("", Me)
j.Download(comando)
Wait For (j) JobDone(j As HttpJob)
If j.Success Then res = j.GetString
j.Release

' su "res" hai il file TXT scaricato

AddApplicationText(<uses-library android:name="org.apache.http.legacy" android:required="false"/>)