Read File on Visual Basic

On visual basic to read file without common dialog or comdlg32.ocx can use this command :
Make button control :

'--------------------Start Code------------------
Private Sub Command1_Click()
read
End Sub

Private Sub read()
Dim data As String
Open "c:\aaaaaa.txt" For Input As #3
Do While Not EOF(3)
Line Input #3, data
Text1.Text = Text1.Text + data + vbCrLf
Loop
Close #3
End Sub
'-------------------------End Code ----------------------

Good Luck

Related Post :