【学生信息管理系统】——问题篇
Q1：實時錯誤91
answer 1：（1）首先是檢查數據庫的連接，檢查VB與數據庫是否連接成功。
在模塊中的代碼這里：ConnectString = “FileDSN=studentinfo.dsn;UID=sa;PWD=123”
UID對應的是自己的SQL server的賬號，PWD對應的是自己的密碼。
（2）其次是檢查ODBC數據源的配置，看看有沒有配置ODBC數據源，或者配置的是否正確。
確保數據庫的配置是正常的，是可用的狀態。數據庫的配置可參考鏈接：SQL 2014 ODBC配 置全過程及遇到的問題解決辦法。
（3）再次是檢查查詢語句，檢查代碼，確保查詢語句書寫的正確性。
（A）、SQL語句之間少了空格：txtSQL = “select * fromuser_Info”
（B）、在一句完全的查詢語句中，比如 txtSQL = “select * from class_Info where class_No=’” & Trim(txtClassno.Text) & “’”，其中在最后判斷輸入框中的條件時，雙引號和單引號一定要注意（整句話的引號從外到內一共分三層：雙引號，單引號，雙引號）。
（C）、在執行查詢學生學籍信息的窗體中，執行語句txtSQL = “select * from result_Info where”，因為后面還要添加條件，所以在‘where’和‘ ” ’之間缺少空格時會出錯。
Q2:未找到方法或數據成員
answer 2：出現此錯誤的原因是對象錯誤，對象名稱與代碼中的不一致，找不到該對象。解決辦法是根據錯誤提示，找到調試時鎖定的位置，核對對象名稱是否一致。
Q3:數據庫設置問題
問題描述：當添加完信息點確定后，出現上述錯誤，實時錯誤’-2147217873(80040e2f)不能將 NULL 值插入列；列不允許空值，INSERT 失敗。 按照提示的錯誤，進行如下操作，允許NULL值為空：
answer 3：【以添加用戶表為例】
右擊——修改——最后一列允許為null值，中的對勾選擇——最后Ctrl+s保存
若出現不允許保存的情況——不允許保存更改，阻止保存要求重新創建表的更改，解決辦法為，工具——選項——取消“阻止保存要求重新創建表的更改”復選框，再確定
Q4:下標越界
answer 4：出現此問題的原因是，代碼中實際需要的表格列數超過表格已有的列數，重新設置表格屬性的行數或列數，來滿足實際需要即可。
Q5:實時錯誤3021
answer 5：錯誤來源——A.查找的數據庫記錄為空.（即剛加載窗體時需要數據庫中的數據，但數據庫中沒有數據） B.查找到數據后,用 Del 命令刪除記錄后,再引用 Fields 后會出現錯誤. C.已經用MoveFirst 或用 MovePrevious 命令 移動至數據庫開始后再用 MovePrevious 命令. D.已經用MoveLast 或用 MoveNext 命令 移動至數據庫開始后再用 MoveNext 命令. 說的簡單點，就是數據庫中沒有了數據。
解決辦法——A、添加錯誤處理：`Private Sub Form_Load() 運行修改學籍窗體
B、添加判斷，判斷數據中是否有需要查詢的表中數據
Private Sub Form_Load()‘運行修改學籍窗體 Dim txtSQL As String Dim MsgText As String Dim str1 As String '得到student表 txtSQL = "select * fromstudent_Info" Set mrc = ExecuteSQL(txtSQL, MsgText)If mrc.EOF = False Then ‘先判斷是否還有記錄，如果還有記錄mrc.MoveFirstCall viewDatamyBookmark = mrc.Bookmarkmcclean=TrueElse ‘如果沒有記錄str1 =MsgBox("沒有學籍信息,是否添加學籍信息？", vbOKCancel, "提示") If str1 = vbOK Then ‘點擊確定unload frmModifysinfo ‘當前窗體卸載frmAddsinfo.Show ‘添加學籍窗體運行Else ‘點擊取消Unload frmModifysinfo ‘當前窗體卸載End If End If End Sub總結
以上是生活随笔為你收集整理的【学生信息管理系统】——问题篇的全部內容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： 着迷英语900句小结
- 下一篇： 【学生信息管理系统】——优化篇（一）