Question

VB6 label显示 本地txt文本内容

txt文件就一行内容，带有文字和字母
试了网上很多的代码 各种错误... 本人菜鸟 刚开始编
txt文件 在C:\windows\system32 目录下

Answer 1

dim i as string,s as string
open "txt文件路径" for input as #1
do while not(eof(1))
line input #1,i
s=s & i & vbcrlf
loop
close #1
label1.caption=s

追问

什么都没显示的说... 是不是精简版的缘故？

追答

前面加一行这个 Label1.AutoSize = True
还有 你的字的颜色问题 看一下是不是和背景一个颜色

追问

我自己研究了下 是权限问题 把1.txt移动到桌面正常使用 但是我1.txt必须放到C:\windows\system32 目录 不知有办法解决不？