VB如何读取TXT文本并按行列出内容

Question

VB中能否实现读取一个TXT文件，按行读取内容，并在VB中的控件中列出来比如 A.TXT里面有三行（或更多行）
张三
李四
赵五窗体中有一个本文框，一个按钮，点击按钮后，程序开始从A.TXT第一行加载内容，按一次加载一行按一次文本框变成 张三 ，再按变 李四，再按就是 赵五 了非常感谢！！！新年快乐！！！

Answer 1

Private Sub Form_Load()
Open "C:\a.txt" For Input As #1
End Sub
Private Sub Command1_Click()
On Error Resume Next
Dim str As String
Line Input #1, str
Text1.Text = str
End Sub已知，留存！！！