作者MrOrz (XDrz。)
看板Visual_Basic
标题Re: [VB6 ] 可以让错误不要显示出来吗?
时间Mon Jul 7 17:33:54 2008
※ 引述《disc1002 (语言可以代表??)》之铭言：
: ※ 引述《Hankmix (汉米克斯)》之铭言：
: : 有没有办法让VB6的错误讯息不要出现呢??
: : 当然DEBUG到没错误是一个方法= =
: : 但是我是想要说让程式如果说有错误就直接关掉之类的
: : 不要有错误代码
: : 或是错误讯息由我自己来设
: : 请问VB6可以办到吗?
: 可以 设定一些err位置
: 比如说当错误发生时
: goto err
还是回文好了XD"
在Sub/Function里面：
Sub (Function) Foo()
On Error Goto ErrHandler
'blah blah blah 这个sub/finction要做的事。
Exit Sub
'程序执行正常时的跳出点。Function请用Exit Function
ErrHandler:
Msgbox Err.Description
Resume Next '显示完错误讯息後继续执行。当然不加这行的话就会结束。
End Sub (Function)
---
On Error叙述後面可以接Goto 标记, Resume Next和Goto 0。
Resume Next就会直接继续，
Goto 0不大清楚(汗) 可以自己研究一下XD"
Resume叙述後面除了Next之外，也可以接另一个标记。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 219.80.179.127
1F：→ Hankmix:谢谢..赶快去试试看 07/07 19:33
2F：推 LPH66:没记错的话On Error Goto 0是取消On Error的设定 07/07 23:00
3F：→ LPH66:这语法貌似是从古早的Basic留到现在的... 07/07 23:01
4F：→ MOONRAKER:古早的 basic 里面 0 也是一个可以使用的行号 07/07 23:30
5F：推 albb0920:用 On Error Resume Exit 有一种莫名的爽感 XD 07/07 23:33
6F：推 albb0920: Next (打太快了) 07/08 11:26
7F：→ MOONRAKER:难怪我觉得前面的爽感好像很难体会 XDDDD 07/08 20:42