VB6画的浏览器出现Run-time error '53':File not found

Question

我对VB小白,用VB画了个浏览器,都是百度上搜的代码. 实现3个功能,一是控制浏览器大小,二是读取ini文件.三是清除Cookies.做好后生成.exe能正常使用.我是其他地方用RunApp打开这个exe的.一直正常但偶尔中间就会出现打不开的情况报错Run-time error '53':File not found.比如想打开10个 前8个打开正常,第9个突然就报错了.然后手动去点这个exe也报错.只有电脑重新启动过了再去开又正常了.偶尔还有 手动点报错 用RunApp打开又能开的情况,相反的情况也有.纠结死我了.下面附上代码 希望有大神帮忙看看情况 先谢谢了.
代码长 发不上来 好心人 将就看图片吧

Answer 1

你关杀毒软件了吗？追问

没装杀毒软件之类的东西.

Answer 2

Kill的问题追问

能详细描述一下吗? 谢谢 . 我对VB 是小白
当报错的时候 我的ini 文件还在的哦. 而且没有修改任何东西 重启电脑就能正常使用了(偶尔重启后还是没用,再重启就好了)

追答Kill CookiesPath+"\*.txt"

这行代码的问题，当该目录没有cookie文件时你再去删除就会出错

追问

用If来判断这个目录下有没有文件吗？能说一下怎么判断吗

用If来判断这个目录下有没有文件吗？能说一下怎么判断吗？因为我对VB了解的不多，对于前面的获取Cookies 路径就已经理解不进去了。

追答Function IsNoFiles(ByVal FilePath As String) As Boolean
    If Dir(FilePath & "\*.txt") <> "" Then IsNoFiles = True
End Function

追问

谢啦,不管结果如何 都谢谢啦

本回答被提问者采纳