读书人

来指点下

发布时间: 2012-02-17 17:50:42 作者: rapoo

高手进来指点下
Private Sub c_cancel_Click()

Err = 0
On Error Resume Next

STATUS.caption = " "
Sqlselect = " "

notice.Locked = False

ret = form_cancel()

Err = 0
End Sub

这是段消除代码,刚开始的Err = 0和最后的是起什么作用的,什么意思?最好可以逐行解释下!谢谢

[解决办法]
穷疯了,5分我也收。

Private Sub c_cancel_Click()
Err = 0
'建立错误标识符,初始化为0
On Error Resume Next
'允许错误逐步调试

STATUS.caption = " "
控件status的caption属性初始化为空
Sqlselect = " "
变量sqlselect初始化为空

notice.Locked = False
控件notice的locked(锁定)设置为假,即不处于锁定状态

ret = form_cancel()
变量ret获取form_cancel过程的返回值

Err = 0
'如果以上代码产生逐步调试错误的话(即err不为0),那么在这里将会被清为零。
End Sub

读书人网 >ASP

热点推荐