1樓：匿名使用者
你可以根據具體的錯誤號進行修改程式啊，比如錯誤號53號就是檔案找不到，還有溢位等等的錯誤號，具體的錯誤號你可以貼出來或者去網上查一下，另外錯誤提示的同時，vb編譯器會告訴你錯誤所在的行，你可以去再檢查一下。
vb 如何捕捉錯誤
2樓：匿名使用者
debug.print s (假設你要捕捉s)這時，就會在立即視窗中顯示s
你也可以新增監視（【檢視】【監視視窗】）
當s改變時就會顯示s的值（在執行時的監視視窗）
3樓：匿名使用者
private sub merrinfo()dim msg as string
msg = " 錯誤代號: " & err.number & vbcrlf _
& " 資訊內容: " & err.descriptionmsgbox msg, vbcritical, "錯誤資訊"
err.clear
end sub
直接呼叫這個過程就可以了
4樓：匿名使用者
print.debut 列印出錯誤好 根據你呼叫的喊出出現的返回值，一般錯誤就返回乙個錯誤好 ，你根據這個錯誤號 去處理就可以了
5樓：
參考一下：
顯示錯誤：
private sub command1_click()on error goto err
'你的**
exit sub
err:
msgbox err.description,16,"錯誤號：" & err.number
end sub
不顯示錯誤（當程式中錯誤的語句不存在）
private sub command1_click()on error resume next
dim a as integer
a="abcde" '錯誤語句
end sub
正常情況下，如果不加on error resume next ，程式會報錯
加了就沒有報錯
6樓：匿名使用者
舉例：private sub command1_click()on error goto errhandledim x as integer
x = 0 / 0 '製造乙個錯誤
exit sub '一定要寫
errhandle:
msgbox "產生了乙個錯誤，錯誤**：" & err.code & " 描述：" & err.description
end sub
vb如何忽略錯誤?
7樓：匿名使用者
用on error 捕獲程式執行時引發的錯誤，捕獲後清除錯誤。實現方法如下
'函式實現除法操作並返回結果。如果發生錯誤（如0除）返回值為0
public function divide(byval v as single) as single
'為了消除可能的錯誤（如即0除錯誤）開啟錯誤捕獲陷阱
'一旦發生錯誤，立即轉到行標號errproc執行
on error goto errproc
divide = 1 / v
exit function
errproc: '發生錯誤時轉到這裡處理
'清除錯誤
err.clear
divide = 0
end function
更為簡潔的寫法如下：
'函式實現除法操作並返回結果。如果發生錯誤（如0除）返回值為0
public function divide(byval v as single) as single
divide = 0
'為了消除可能的錯誤（如即0除錯誤）開啟錯誤捕獲陷阱
'當錯誤發生時，立即執行下一條語句，即 on error goto 0
on error resume next
divide = 1 / v
'關閉錯誤陷阱
on error goto 0
end function
8樓：匿名使用者
on error resume next
9樓：匿名使用者
在過程的 開頭加
on error resume next
vb 如何捕捉錯誤
10樓：匿名使用者
private sub command1_click()on error goto skip '指明在一下語句執行過程中如果發生錯誤則跳轉到標籤 skip 處執行，標籤可以自定義。
'-----這裡是正常執行語句--------------exit sub '退出語句塊，防止在沒有出現錯誤的情況下執行下面的語句
skip: '跳轉標籤
msgbox "錯誤號：" & err.number & chr(13) & chr(10) & err.description '獲取錯誤號和錯誤說明。
end if
end sub
11樓：匿名使用者
on error 就是在發生錯誤是觸發
然後後面跟goto 就是發生錯誤就到指定的標號處執行你的錯誤處理**例如on error goto errheaderon error resume next 這樣寫就是忽略錯誤繼續執行下去，可以防止vb報錯而中斷程式。
errheader一般放置在過程的末尾。正常執行到這個標號的地方就exit出去，不執行他。除非是出現錯誤才來執行這段**
12樓：匿名使用者
on error resume next或on error goto…
vb中如何跳過錯誤
13樓：小李無刀
在vb中，可以在程式產生錯誤時，直接跳過錯誤繼續下一句執行，其**是：
on error resume next
當然，我們也可以在報錯時，直接跳轉到指定的地方：
on error goto aaa
....
aaa:
msgbox 「error」
14樓：
遇到任何錯錯直接執行下一句
on error resume next
遇到錯誤跳轉到某行
on error goto a
'['**行
']exit sub
a:msgbox "發生錯誤 "
關閉錯誤處理,開啟錯誤處理會降低程式的執行郊率，但前提你必須保證你的程式錯誤一點也沒有！
on error goto 0
歡迎到我的qq 群裡討論:10170490
15樓：匿名使用者
把錯誤的語句給注釋掉就可以了
16樓：
on error goto err..
.err:
err為跳到的位置
17樓：匿名使用者
on erroru goto xx 或 on error resume next
18樓：真情_旋律
on error resume next
vb中程式錯誤的捕獲以及處理方法
19樓：匿名使用者
捕捉錯誤資訊主要用on error語句，如下例子： 此例子使用 on error goto 語句在乙個過程中指定錯誤處理的**所在。本示例中，試圖刪除一已經開啟的檔案從而生成的錯誤碼為 55。
這個錯誤將由示例中的錯誤處理程式碼來處理，處理完後，控制會回到發生錯誤的語句處。on error goto 0 語句關閉錯誤陷阱。然後 on error resume next 語句用來改變錯誤陷阱，以便發覺下乙個語句產生的錯誤的範圍。
請注意示例中使用 err.clear 在錯誤處理完後，清除 err 物件的屬性sub onerrorstatementdemo() on error goto errorhandler ' 開啟錯誤處理程式。 open "testfile" for output as #1 ' 開啟輸出檔案。
kill "testfile" ' 試圖刪除已開啟的檔案。 on error goto 0 ' 關閉錯誤陷阱。 on error resume next ' 改變錯誤陷阱。
objectref = getobject("myword.basic") ' 試圖啟動不存在 ' 的物件'檢查可能發生的 automation 錯誤。 if err.
number = 440 or err.number = 432 then ' 告訴使用者出了什麼事。然後清除 err 物件。
msg = "there was an error attempting to open the automation object!" msgbox msg, , "deferred error test" err.clear ' 清除 err 物件字段。
end if exit sub ' 退出程式，以避免進入錯誤處理程式。errorhandler: ' 錯誤處理程式。
select case err.number ' 檢查錯誤代號。 case 55 ' 發生「檔案已開啟」的錯誤。
close #1 ' 關閉已開啟的檔案。 case else ' 處理其他錯誤狀態 . .
. end select resume ' 將控制返回到產生錯誤的語句。end sub
vb中如何做錯誤處理，VB中如何做錯誤處理
在可能會出錯語句前加 on error resume next 或on error goto err1 err1為識別符號 在可能出錯的語句前邊新增錯誤陷阱語句 on error goto errlabel 在出現以上語句的模組中,在此語句以後的所有 出現錯誤時,均會自動轉向errlabel 行.例...
VB提示錯誤的引數號或無效的屬性賦值是怎麼回事啊。。高手求助
pset用法錯誤，沒有指定顏色引數 pset 方法 將物件上的點設定為指定顏色。語法object.pset step x,y color pset 方法的語法有如下物件限定符和部分 部分 描述 object 可選的。物件表示式，其值為 應用於 列表中的物件。如果object 省略，具有焦點的窗體作為...
賽爾號密碼錯誤，登不上
被盜了，去官網點選找回密碼，填寫公尺公尺號後，選擇註冊郵箱，填寫你註冊公尺公尺號時的郵箱 希望你的註冊郵箱不是亂填滴.就ok啦，然後進入郵箱，找到公尺公尺網給你的郵件，郵件裡有個 點選進去，直接改密碼，呵呵，我的號也經常被盜呢 你是不是忘密碼啦，要不你重新整理幾次試試，再不登入你的郵箱找回試試，再不...