2个回答
展开全部
我推荐你用textbox(MultiLine设为true,scrollbars设为3)来装载数据,这样可以显示多行和具有滚动条
事件中加入
dim Ks,K,Kf '这个我也不知道定义为什么好,因为在MSDN里的例子也没有定义类型。。。
dim TStr as string,TPath as string
TPath="c:\1.txt" '自己改路径
Set Ks = CreateObject("Scripting.FileSystemObject")
Set K = Ks.GetFile(TPath)
Set Kf = K.OpenAsTextStream(ForReading, TristateUseDefault)
TStr=Kf.readall
Kf.Close
set kf=nothing:set K=Nothing:set Ks=nothing
text1.text=Tstr
事件中加入
dim Ks,K,Kf '这个我也不知道定义为什么好,因为在MSDN里的例子也没有定义类型。。。
dim TStr as string,TPath as string
TPath="c:\1.txt" '自己改路径
Set Ks = CreateObject("Scripting.FileSystemObject")
Set K = Ks.GetFile(TPath)
Set Kf = K.OpenAsTextStream(ForReading, TristateUseDefault)
TStr=Kf.readall
Kf.Close
set kf=nothing:set K=Nothing:set Ks=nothing
text1.text=Tstr
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
难到是我没看懂你的问题?
打开**.txt
读全部
赋值到label
打开**.txt
读全部
赋值到label
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询