Visual Basic - FACIL CUALKIERA LO SABE

k cargue un fichero yo he puesto el codigo de abajo, pero lo k necesito es k lo cargue todo no linea por linea, y que despues con una funcion en un boton pueda pegarlo todo en un texto, MUCHAS GRAICAS
Dim Linea As String
Open "c:\texto.txt" For Input As #1 'Abre el archivo de modo lectura
Do Until EOF(1) 'un ciclo hasta el fin de archivo
Line Input #1, Linea 'Lee un registro del archivo -
codigo = Mid(Linea, 1, 8) 'Extrae 8 caracteres
Loop
Close #1 'cierra el archivo

Que Que ?
Meter todo a una variable ?
Usa Dos Variables Linea y Contenido por ejemplo y en la parte de
Input #1, Linea abajo pones
Contenido = Contenido & Linea
..
Close#1

msgbox Contenido
contendra todo lo del archivo