vb读取当前文件夹下的文件夹下的文本文件

2024-12-21 23:01:12
推荐回答(1个)
回答1:

利用VB中的“App.Path”

例如“工程1.exe”在C:\A\

那么App.Path就等于"C:\A"(注意,最后没有“\”,但是工程1.exe处于磁盘根目录下是有“\”的)
那么打开A目录下的USER文件夹里的文件就是

App.Path & "\user\"

你要打开的文件是11.txt,

代码:
open app.path & "\user\11.txt" for input as #1
do while not eof(1)
line input #1,aspect
whole = whole & aspect & vbcrlf
loop
text1.text=whole
close #1