學生系統已經完成,期間遇到了很多錯誤。下面爲大家一一介紹。
(一)變量未定義 2$ ——定義dim
解決如何定義,如下幾種格式均可。
Dim str2 As VbMsgBoxResult
Dim str2$ 或者Dim Str2 As String
Dim Str2% 或者 Dim Str2 As Integer
(二)實時錯誤94,無效使用Null值
在代碼提示行後面加上——& ""即可
(三)實時錯誤424,要求對象
1、沒找到窗體
2、確保工程中的類名稱是有效的
3、控件名與代碼不匹配
(四)實時錯誤3265,未找到項目,
這個問題和424的內涵差不多,都是沒有找到需要的窗體或者控件
(五)實時錯誤“91”對象變量或with塊變量未設置”
解決這個問題有點複雜,稍後會專門出一篇博客,介紹這個問題
(六)實時錯誤“3201”
我們先來了解一下EOF,BOF的用法:
BOF:指當前記錄位置位於Recordset對象的第一個記錄之前;
EOF:指當前記錄位置位於Recordset對象的最後一個記錄之後。
解決方法: 加一個判斷語句,遇到就會自動跳過
on Error GoTo 1
mrc.MoveNext
call viewData
If Err = 3021 then
If MsgBox ("已經沒有數據,是否添加數據?",vbOKCancel, ”提示 ") = vbOK then
frmAddresult.show
end if
end if
end sub
當點擊下一條沒有數據的時候,就會彈出提示框問是否添加數據,這樣就可以避免出現錯誤。
(七)敲代碼的時候一定要專心,細心,認真。調試代碼的時候更要這樣。 貢藝必精苦,用心必公平。