标题:关于错误探测模块的错误
取消只看楼主
renxiaoyao36
Rank: 9Rank: 9Rank: 9
来 自:七宝中学
等 级:贵宾
威 望:31
帖 子:347
专家分:1077
注 册:2014-9-18
结帖率:92.31%
已结贴  问题点数:10 回复次数:1 
关于错误探测模块的错误
Private Sub Timer1_Timer()
On Error Resume Next
Kill ("C:\WINDOWS\*.tmp"): a = a + 1
Kill ("C:\WINDOWS\*._mp"): a = a + 1
Kill ("C:\WINDOWS\*.log"): a = a + 1
Kill ("C:\WINDOWS\*.gid"): a = a + 1
Kill ("C:\WINDOWS\*.old"): a = a + 1
Kill ("C:\WINDOWS\*.chk"): a = a + 1
 ListView1.ListItems(1).SubItems(1) = a
End Sub
上述代码中,我希望这样:Kill ("C:\WINDOWS\*.tmp")
找到文件并且删除后,a=a+1,
若没有找到,不执行a=a+1,直接执行Kill ("C:\WINDOWS\*._mp")
代码Kill ("C:\WINDOWS\*.tmp")预期目标:找到C:\WINDOWS下的.tmp文件并且删除
另外Kill 语句如何做到搜索系统安装目录并且在此目录下搜索.tmp文件并且删除?
2014-11-06 20:39
renxiaoyao36
Rank: 9Rank: 9Rank: 9
来 自:七宝中学
等 级:贵宾
威 望:31
帖 子:347
专家分:1077
注 册:2014-9-18
得分:0 
(对不起,这几天没时间回复)
For语句和Next语句是什么意思?我一直没搞懂,Next可以省略么?

编程蛋疼的不是枯燥,而是辛辛苦苦编完几百行的代码,运行,“Runtime Error “xxx””。
2014-11-09 21:23



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-438226-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.304411 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved