Risolto.
Ecco la soluzione

codice:
Inet1.Protocol = icFTP
    Inet1.URL = "ftp://ftp.miosito.it"
    Inet1.RemotePort = 21
    Inet1.UserName = "mio_username"
    Inet1.Password = "mia_password"
    
    Inet1.Execute Inet1.URL, "GET file_remoto file_locale"

    Do Until Inet1.StillExecuting = False
    DoEvents
    Loop