Question

VB文件的相对地址

打开一个文本文件就要用到文本文件的绝对地址，如:c:\vb\test.txt。有什么方法可以用相对地址打开项目目录下的文件。假如test.txt文件就和项目在同一个文件夹中，就只写“test.txt”
If File.Exists("F:\vb\test.txt") = True Then
TextBox4.Text = File.ReadAllText("F:\vb\test.txt")
Else
MsgBox("文件不存在!", MsgBoxStyle.Exclamation, "注意")
End If
我的程序就是这样子，请大家两位帮我改一下。万分感谢！！
我改的结果是“文件不存在”或“未声明名称‘App’”。

Answer 1

App.Path用来表示当前可执行文件所在的路径。
如果程序放在c:\vb下，可以使用 App.Path & "\test.txt"访问c:\vb\test.txt

你的那段程序
If File.Exists(app.path & "\test.txt") = True Then
TextBox4.Text = File.ReadAllText(app.path & "\test.txt")
Else
MsgBox("文件不存在!", MsgBoxStyle.Exclamation, "注意")
End If

Answer 2

File.Exists("test.txt") = True Then
TextBox4.Text = File.ReadAllText("test.txt")
Else
MsgBox("文件不存在!", MsgBoxStyle.Exclamation, "注意")
End If

Answer 3

app.path 是你程序的地址
app.path & "\test.txt"

Answer 4

app.path & text.txt