请问这是什么控件呀？

Question

类似于visual foxpro里的editbox控件，就是说在里面可以一行一行显示每一步的操作情况，我用text控件，但是只能显示一行。
要实现这样的功能：
更新记录...
原记录标准号为：GB0002
更新后标准号为：GB0012
更新PDF标准文件：C:\Documents and Settings\sunjie\桌面\企业标准数据库管理系统 V1.0\企业标准数据库管理系统 V1.0\\PDF\GB0012.pdf
更新成功！

Answer 1

将 text 的 MultiLine 设置成 true，再将控件拉大或设置滚动条。

Answer 2

我也是这么设置的，是不是编写的时候还需要写什么呀，我是怎么写的：
Text1.Text = "卡片已就绪，正在校验AR_KEY......"
Text1.Text = "卡片已就绪，正在读取代码基本数据......"
Text1.Text = "卡片已就绪，正在读取代码扩展数据......"
出现的效果就是一行显示出来后，下一行还是在第一行的位置显示，原来的行没有往上窜，这个问题怎么解决呀？

Answer 3

Text1.Text = Text1.Text & vbcrlf & "卡片已就绪，正在校验AR_KEY......"
Text1.Text = Text1.Text & vbcrlf & "卡片已就绪，正在读取代码基本数据......"
Text1.Text = Text1.Text & vbcrlf & "卡片已就绪，正在读取代码扩展数据......"

Answer 4

用一个for语句,然后加listbox.additem ""

Answer 5

我还想光标跟着最后一行滚动，现在的效果只是停留在第一行，没有滚动的效果，请问怎么实现？
==============///Text1.Text = Text1.Text & "卡片已就绪，正在校验AR_KEY......"
Text1.SelStart = Len(Text1.Text)
Text1.SetFocus
Text1.Text = Text1.Text & vbCrLf & "卡片已就绪，正在读取代码基本数据......"
Text1.SelStart = Len(Text1.Text)
Text1.SetFocus
Text1.Text = Text1.Text & vbCrLf & "卡片已就绪，正在读取代码扩展数据......"
Text1.SelStart = Len(Text1.Text)
Text1.SetFocus

Answer 6

text1.seltext="卡片已就绪，正在校验AR_KEY......"
text1.selstart=len(text1.text)
text1.seltext="卡片已就绪，正在读取代码基本数据......"
text1.selstart=len(text1.text)
text1.seltext="卡片已就绪，正在读取代码扩展数据......"
text1.selstart=len(text1.text)

Answer 7

’====看题不仔细text1.seltext="卡片已就绪，正在校验AR_KEY......" & vbcrlf
text1.selstart=len(text1.text)
text1.seltext="卡片已就绪，正在读取代码基本数据......" & vbcrlf
text1.selstart=len(text1.text)
text1.seltext="卡片已就绪，正在读取代码扩展数据......" & vbcrlf
text1.selstart=len(text1.text)