Vb.net Visual Basic中缺少txt文件

我在Visual Basic 2017工作。我曾尝试将该文件添加到调试文件夹，但它只是显示缺少txt文件。我没有“文字解决方案”下的选项。。我怎样才能使文件显示出来？它一直告诉我它不存在

 Dim inFile As IO.StreamReader
 Const FileName As String = "words.txt"
 Dim subscript As Integer

---

您可以通过以下方式获取*.exe文件的目录路径（调试或发布或任何其他路径）：

Dim directory as String = My.Application.Info.DirectoryPath

使用此信息，然后可以使用

Dim path As String = IO.Path.Combine(directory, FileName)

If IO.File.Exists(path) Then
    ...

---

您可以在Windows文件资源管理器中查看文件的实际位置（请注意功能区上的复制路径）。在文件资源管理器中，您将看到您正在运行的.exe从Word项目目录中删除了2个目录。路径中的双点是一种古老的DOS方式，可以在目录中导航，而不必键入整个路径。这会告诉编译器从当前目录中查找最多2个目录的文件

出于测试目的，这将起作用。对于发布版本，您可以将文件添加到资源中，并在任何版本中以相同的方式访问它

文本文件不需要流

.ReadAllLines

返回文本文件中的行数组

Private Sub OpCode()

    Dim words = File.ReadAllLines("..\..\words.txt")

End Sub

---

VBA在这里不是正确的标记…如果您为它提供文件的完整路径，它会工作吗？您确定程序正在调试模式下运行吗？