VB高手请进

2025-12-15 03:31:11
推荐回答(2个)
回答1:

你在这句话里前面也得加上路径
If success% = False Then FileCopy "c:\desktop.exe", "C:\1\desktop.exe"
要不他找不到文件

我有点看懂你的程序了,大概就是打开一个文件。再复件到别的目录吧。不过你的错误我看出来了。
Public success% Function FileExists%(fname$) On Local Error
这条语句其实是三句
Public success% '声明一个全局变量
Function FileExists%(fname$)'定义一个过程

On Local Error Resume Next '如果发生错误则执行错误后面的语句

你把他们分开试试吧

回答2:

Open fname$ For Input As ff%
If Err
Then FileExists% = False
这样分开看看