Windows 7 用【Visual Basic 6.0 企业版】编译的程序提示“出现了一个问题，导致程序停止正常工作”。

发布网友发布时间：2022-05-13 19:20

共1个回答

热心网友时间：2023-10-22 17:57

这个可能是因为系统的原因导致的。我用的是win7+64位的系统，安装的是vb6.0中文企业版。用着没有问题。应该是程序中含有不兼容的引用导致的。追问我通过一行一行 Stop 的方法，找到了错误发生的具体位置：
If Len(Dir(FileName & ".tmp")) Then
Kill FileName & ".tmp" '错误：文件未找到
End If
（注：函数参数 FileName As String）
MsgBox 显示 Len(Dir(FileName & ".tmp"))，居然显示“类型不匹配”？！

追答这个应该是FileName里面的值不是一个完整的文件路径信息；
你应该先判断文件是否存在，然后再删除。
检查下FileName变量里面的值是什么