vb的caption能否在循环中改变

来源:百度知道 编辑:UC知道 时间:2024/05/27 01:15:08
我想打开指定文件,然后讲其内容一行行输出到Label的caption中
代码如下:
Open App.Path & "\TableName.txt" For Input As #FreeNum
Do Until EOF(FreeNum)
Line Input #FreeNum, TableName
Label5.Caption = Label5.Caption & vbckrf & TableName
Exit Do
Loop
运行时只能讲第一行显示请高手指点(代码在此方法中Private Sub Form_Load())

自己 Exit Do 了,只读取了一行,当然只显示第一行了

解决办法,
把Exit Do 去掉

你要把label5的autosize 设为true,
另外你的换行符写错了,不是vbckrf,是vbcrlf