Visual Basic - Cargar archivo

Hola a todos.
El problema que tengo es que necesito cargar un archivo de mas de 1MB a memoria, ya intentado con DATOS = Input$(LOF(1), 1)
pero esto es demaciado lento se demora 1 minuto. Si alguien sabe de una forma mucho mas rapida espero porfavor me colabore.
Muchas gracias.

Si tu archivo es una aplicacion, por ejemplo un exe, entonces estudia acerca de la funcion SHELL.
Pero si tu archivo no es aplicacion, por ejemplo es un *.doc, *.xls, *.bmp, etc, entonces estudia acerca de la api SHELLEXECUTE
hasta luego.

Una manera rápida, si sólo quieres visulizar el archivo, es agregando un RichTextBox y agrega en la propiedad File la ruta y nombre del archivo que quieras ver.

Hasta luego

Usá la instrucción Open para abrir el archivo en modo binario y después leelo todo. Por Ej:

Sub CargarArchivoGrande()
Dim sData$
Dim hFile%

hFile=FreeFile

Open MiArchivo For Binary As #hFile

sData = String$(LOF(hFile),0)

Get #hFile,1,sData

Close #hFile

End Sub

Esto es MUY rápido y carga en poco tiempo (unos 4 o 5 segundos) un archivo de hasta 10 MB en la variable sData.