好吧问答库 > VB中怎样读取TXT文档中的全部数据到ladel中，比如TXT中的G代码，请高手赐教。谢谢

VB中怎样读取TXT文档中的全部数据到ladel中，比如TXT中的G代码，请高手赐教。谢谢

求源代码谢谢

2025年01月07日 06:55

有2个网友回答

网友（1）：

我推荐你用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

网友（2）：

难到是我没看懂你的问题?
打开**.txt
读全部
赋值到label

VB中 怎样读取TXT文档中的全部数据到ladel中，比如TXT中的G代码，请高手赐教。谢谢

VB中怎样读取TXT文档中的全部数据到ladel中，比如TXT中的G代码，请高手赐教。谢谢