学生系统已经完成，期间遇到了很多错误。下面为大家一一介绍。

（一）变量未定义 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

当点击下一条没有数据的时候，就会弹出提示框问是否添加数据，这样就可以避免出现错误。

（七）敲代码的时候一定要专心，细心，认真。调试代码的时候更要这样。   贡艺必精苦，用心必公平。