Visual Basic 6 - velocizzare uso file binari

Salve a tutti
in un programma visual basic 06 ho provato a copiare un file aprendo l'originale in modalità binary, leggendo ogni byte e depositandolo nella copia.
Il problema e che per file lunghi (.avi, immagini bitmap create con paint etc.) ci mette qualcosa come tre quarti d'ora a realizzarsi, o comunque tempi improponibili!!!!!!!!!!!!!!!!!!!!!
Ho provato a aprirlo in una modalità diversa ma in sequenziale non riesce a copiarlo (riesce a depositare nella copia solo una strana scritta) mentre con random i tempi sono gli stessi.
In Visual Basic .NET si potrebbero usame i comandi

My.Computer.FileSystem.ReadAllBytes
My.Computer.FileSystem.WriteAllBytes

ma in VB 06? Avete qualche idea di come velocizzare il processo?
Grazie mille

Call FileCopy(percorso iniziale, percorsofinale).
ma non ho mai provato su file lunghi.

Grazie mille
funziona tutto a meraviglia

Di nulla.
piuttosto hai scoperto perchè andava così lento?

Andava cosi' lento perche' leggeva ogni byte e lo scriveva in un altro. Assurdo.

E' vero leggeva un byte alla volta ma pensavo che fosse l'unico modo per farlo.
Comunque ho scoperto che in alternativa si possono leggere e depositare tutti i byte usando un array in questo modo:

Dim x() As Byte
Get #1, ,x
Put #1, ,x

così puoi anche velocizzare la modifica di file grandi!!!!!!!!!!!!