回应tq的问题: 在程序中有时对于发生的错误是已知可能会发生且没有必要响应该错误时,就可以忽略错误.屏蔽掉系统错误对话框. 如使用FSO操作文件时,打开文件,如果文件不存在则新建文件,可使用如下代码: On Error Resume Next '发生错误时执行下一行 '如果文件已经存在,则直接打开文件 Call mFSO.CreateTextFile(mLogFilePath, False) On Error GoTo 0 '如果有错误忽略 Set mFIL = mFSO.GetFile(mLogFilePath) Set mTS = mFIL.OpenAsTextStream(ForAppending)
on error resume next 和on error goto 0有什么区别啊? 都是向下执行。
2.on error :
<1>on errer goto 标签
...
标签:
...
<2>on errer resume next
出错后继续执行以下语句
3.在delphi中有application.terminate可以结束整个程序,vb中用什么?
Exit sub
4.看到有的程序中用了wscript,可是我用的时候报错,是要添加引擎吗?应该怎样在vb中使用wscript呢?
应用用
dim obj as object
set obj=CreateObject("类名")
将错误对象Err重新初始化,可以用来在错误陷井中忽略错误。
2.on error 的作用范围是什么?
举例来说
A函数调用B函数,B函数有错误捕获代码时,B出错时由它自身进行错误处理,B没有错误处理时,错误会引发A的错误处理。
3.在delphi中有application.terminate可以结束整个程序,vb中用什么?
VB中使用end
前3问 justaswind() 都答对了,给分。
在程序中有时对于发生的错误是已知可能会发生且没有必要响应该错误时,就可以忽略错误.屏蔽掉系统错误对话框.
如使用FSO操作文件时,打开文件,如果文件不存在则新建文件,可使用如下代码:
On Error Resume Next '发生错误时执行下一行
'如果文件已经存在,则直接打开文件
Call mFSO.CreateTextFile(mLogFilePath, False)
On Error GoTo 0 '如果有错误忽略
Set mFIL = mFSO.GetFile(mLogFilePath)
Set mTS = mFIL.OpenAsTextStream(ForAppending)
都是向下执行。