Simone
程序开启文件时，若没有指定文槐枝件的目录，则所开启的将是「目前目录」孙早的文件，但目前目录是经常改变的，如果指定目录，则将来安装程序时，被开启的文件必须安装于指定目录中，比较没有弹性。 解决以上问题的方法利用以下方法开启文件： Open App.Path + "\" + "文件名称" For ┅ 并且将被开启的文件与可执行文件放在同一目录即可，因为 App.Path 所代表的就是应用程序所在的目录。不过使用App.Path有一件事情要特别注意，当App.Path 位于根目录时，则App.Path最右边的字符为"\"，例如"c:\"，但如果App.Path不在根目录，则App.Path 最右边的字符不为"\"，例如"d:\kj\app1"，因此欲求取应用程序所在目录某一文件的完整路径名称，应该使用以下方法： Dim fullpath As String If Right(App.Path, 1) = "\" Then ' 若 App.Path 为根目录 fullpath = App.Path + "文件名称" Else fullpath = App.Path + "\" + "文件名称" End If ' fullpath 等于 "文件名称" 的完整路径名称 来源:SEO基地 当某一程序下有多个相同的文件时，比如"e:\ksxt"目录下有多个要找个相同的文件，这时候系统就会按照一定的顺序找到第一个文件，并当做目前需要使用的文铅凯敏件，所以，这种情况下，最好使该目录下只有这一个文件。正是如此，使用未来教育软件做计算机二级考题的同学们做到类似的问题，总会报错，说输入超出文件尾，那是找错了文件，只要把文件的完整的目录打上，就不会报错了。
