vb自动化错误,系统找不到指定文件

vb自动化错误,系统找不到指定文件，以下方法可以解决：

虽然在指定的 GetObject 或CreateObject 函数调用中找到此类,但并没有显露编程的接口。除非一个对象有支持自动化的接口,否则不能写代码来控制该对象的行为。

检查创建此对象的应用程序的文档,以了解在此对象类上使用自动化的限制。

您将一个工程从 .dll 更改为 .exe,或从 .exe 更改为 .dll。

如果您有一个已经编译并注册了

这句有问题 Open App.Path &"c:\vb.txt" For Input As #fileno

app.path 是指工程所在的路径，比如“D:\程序”

那么 App.Path &"c:\vb.txt"就得到“D:\程序c:\vb.txt”

这样的路径肯定是找不到文件的。

如果你的文件保存在c盘根目录下，就改为Open "c:\vb.txt" For Input As #fileno

如果你的文件保存在工程所在的目录下，就改为

Open App.Path &"\vb.txt" For Input As #fileno

其次，只能将一行读取到一个变量中

要改成 Input #fileno, mystr

第三，文本文件的内容都是字符串，不能直接赋值给Single 变量

---