请问各位大虾，如何能实现按第一下按钮，在文本框中显示第一行文字；再按第二下按钮，在文本框中显示第二行文字。
先行谢过回答的好人！！

在按下第二个按钮时在文本最前接一个回车符。。

记得把可多行显示的属性改为真。。。

我想他要问的应该是如何读文件的下一行.
建议可以试着用一下FSO对象.里面的TextStream有个ReadLine的方法.

不好意思。。没看清

我想知道他说的按下按钮显示一行文字, 这个要显示的文字从那里来?

如果是文本文件里读取,可以用静态变量记下已经显示过的行数, 便可以实现!!

Dim strLine() As String
Dim llCount As Long
Dim llCounts As Long
Dim llLetterS As Long
Dim llLetter As Long
Private Sub cmdContine_Click()
If Timer1.Enabled = False Then
Timer1.Enabled = True
Else
Timer1.Enabled = False
End If
End Sub

Private Sub cmdExit_Click()
Unload Me
End Sub

Private Sub cmdRead_Click()
rTxtTest.FileName = App.Path & "/test.txt"
End Sub

Private Sub cmdStart_Click()
strLine = Split(rTxtTest.Text, vbCr)
llCounts = UBound(strLine) - LBound(strLine)
llCount = LBound(strLine)
Timer1.Enabled = True
End Sub

Private Sub Form_Load()
rTxtTest.Text = ""
Timer1.Enabled = False
txtOut= ""
End Sub

Private Sub Timer1_Timer()

If llCount > llCounts Then
txtOut = txtOut & "程序执行结束"
Timer1.Enabled = False
Exit Sub
End If
If llLetter = Len(strLine(llCount)) Then
llCount = llCount + 1
llLetter = 0
Else
llLetter = llLetter + 1
txtOut= txtOut & Mid(strLine(llCount), llLetter, 1)
End If
end sub
看看这个你就知道了， 这个是按照 一个字一个字打的，你的比这个简单

对不起，可能没说清楚。
我的意思是，只有一个按钮，第一次按按钮后，从文件中读出文件中第一行的数据在文本框中显示出来；第二次按按钮后，从文件中读出文件中第二行的数据在文本框中显示出来；依次类推。