Ennesima prova:

Inet1.AccessType = icDirect


strURL = "ftp://ftp.microsoft.com/developr/vb/public/readme.txt"
Text1.Text = Inet1.OpenURL(strURL)

esito: timeout della richiesta.

Non riesco a capacitarmi.