Question

急！求Vb6中标签直接显示txt文件内容的方法

就是在载入【From2】窗口的时候，【text2】的【caption】是目录下【/资源/文本资源/文本.txt】的内容，求各位大大如何编写这段代码？新手一个，在这里谢谢大家了。今天18:30以前回答并且可用的本人追加20分

Answer 1

如果你说的是text2的text的内容那就用下面的代码：
Dim a
Open "xxx.txt" For Input As #1
Line Input #1, a

Close #1

Text2.Text = a

追问

那么请告诉我如何读目录下的【资源/文本资源/1.txt】（资源目录会移动，比如今天在桌面，明天在D盘，可是里面内容始终没有改变。还有就是如何随机读（比如1.txt,2.txt,3.txt……随机读）
求解答！好人一生平安！我会在提高悬赏的（已经提高10了）

追答

在百度知道改版前，最后一次回答问题了。
程序是跟你的文本一起的？如果是的话，那就如下：
'把Text2.MultiLine 设为 True
Dim a, i As Integer
Text2.Text = ""
Randomize
i = CInt(Rnd * 2 + 1) '随机数字1，2，3
Open App.Path & "\资源\文本资源\" & i & ".txt" For Input As #1
Do While Not EOF(1)
Line Input #1, a
Text2.Text = Text2.Text & a & vbCrLf
Loop
Close #1
上面代码将实现随机读取 \资源\文本资源里的txt文本（文本内容单行或者多行都可）

Answer 2

text没有caption 属性
你 是不是说text的text属性啊/