vb6 - 如何解决运行时错误 53，未找到文件？

Question

我有一个我没有编写并正在对其进行修改的项目，但出现错误 53，未找到文件。

如果我从 Visual Basic 中运行项目，则没有错误，但是当我编译可执行文件并运行它时，我看到错误 53。

有人可以告诉我解决此问题的最佳方法吗？如果错误发生在 Visual Basic 内部，那么我可以使用调试工具，但它只发生在编译的可执行文件中，而且我不知道找不到哪个文件。

我刚刚浏览了整个表单（我相信这个错误正在发生）并将应用程序路径添加到Open正在调用文件的每个命令，但在运行编译的可执行文件时仍然收到错误 53。

编辑：我能够找到找不到的文件。我可以看到该文件在项目目录中，但在构建可执行文件后找不到。有没有特殊的打开方式，或者引用这个文件？

违规行：

Open "default.txt" For Input as #1

标签： vb6

Answer 1

最终对我有用的是在文件前面加上App.Path.

我的问题是我重新命名了我的项目目录，但我的代码没有反映这种变化：

App.Path & "\DirIForgotToIncludeHere\default.txt" For Input As #1