请问VB6如何先判断文件是否存在再声明

判断存在不是Dir吗？

1.　可以用 Dir( )先检查指定路径中的文件是否存在，
　　文件不存在就返回、或提示错误信息等（按你的想法进行相应处理），
　　文件存在就继续执行、调用相应的API。
　　你在2楼说的“私有函数中不能用Dir”，这是不可能的。
2.　可以用API函数 LoadLibrary( )来“测试”在系统默认的几个目录中是否有对应文件。
　　对“有文件”或“无文件”，分别处理（具体参照1的“判断结果”）。
　　注意：如果LoadLibrary( )成功（文件存在），应立即执行 FreeLibrary( )。
3.　应该可以用 On Error Goto 语句来设置“异常捕获”。
　　如果“相应的几个文件夹”之中有对应DLL，API函数就可以正常执行；
　　否则会出现运行时错误。
　　但这种情况下On Error Goto 是否有效，就不清楚了，楼主自己试验。