字段太小3163 问题，请教一下

If MsgBox("您确认要保存吗?", vbOKCancel + vbInformation, "提示") = vbOK Then
         Set rst = CurrentDb.OpenRecordset("tblCodeBxlb", dbOpenDynaset)
         rst.AddNew
         rst("lbId") = acchelp_autoid("L", 3, "tblCodeBxlb", "lbId")
         rst("lbmc") = Me.lbmc
         rst.Update
         rst.Close
        Set rst = Nothing
        '刷新数据
        If IsLoaded("usysfrmMain") Then
               DoCmd.Echo False
               Forms!usysfrmMain!frmChild.SourceObject = "frmCodeBxlb_child"
               DoCmd.Echo True
        End If
        MsgBox "保存成功!", vbInformation, "提示"
        Me.lbmc = Null
End If

运行时，   rst("lbId") = acchelp_autoid("L", 3, "tblCodeBxlb", "lbId") （这一段是黄色颜色显示） 提示

代码是没有问题的，是我复制另一个窗体修改的，这是一个Add窗体，请高手指点一下，谢谢