Abrir un txt en un TextBox mediante Command Button

[elias77]

Holas quisiera saver como puedo hacer para abrir un archivo .txt en un textbox utilizando un command button. Es desir que cuando presione el boton (command button) abra, por ejemplo c:\archivo.txt en un textbox, el punto es que no quiero que me abra la ventana para seleccionar el archivo. Sabiendo la direccion del mismo que lo abra directamente

[elias77]

No importa, ya solucione mi problema, puse un Comon dialog y en el command buton puse este codigo:

Dim largo As Long
Dim texto As String

Open "c:\archivo.txt" For Input As #1
largo = FileLen("c:\archivo.txt")
texto = Input(largo, #1)
Close #1
Text2.Text = texto

El que lo quiera, ahi lo tiene.