作者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