注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

盖丽男廊坊师范学院信息技术提高班十一期

 
 
 

日志

 
 

学生管理系统调bug  

2014-07-05 22:19:48|  分类: vb与数据库 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
         今天来机房调自己敲得学生管理系统的bug,其实前些日子就敲完了,不过当时那两天太忙,就没有继续整,之后陆陆续续的调了一些,打算这两天把bug调完好验收,不过现在觉得调bug真是一项恶心自己的事业。。。。今天就整了一个窗体,反反复复的出同一个错,就是这个:
学生管理系统调bug - 十一期盖丽男 - 盖丽男廊坊师范学院信息技术提高班十一期
都快被恶心死了,通过各种努力,我知道是代码写错了,直接把好的代码粘贴过来就能用,但是自己照着改就死活不好。。。。
        
 还有一个错误,就是这里,本来我改成这样是能运行的,结果不知道昨天晚上碰到了哪里,竟然不能运行了!代码是这段:

 If mrc.RecordCount < 0 Then

        MsgBox "还木有记录呢"

        Exit Sub

    Else

        mrc.MoveFirst

   

End If

总是弹窗错误,学生管理系统调bug - 十一期盖丽男 - 盖丽男廊坊师范学院信息技术提高班十一期

 

今天我把代码改成了这段,就可以运行了,不知道是为什么。

             If mrc.EOF = False Then

        mrc.MoveFirst

        Call viewdata

        mybookmark = mrc.Bookmark

    Else

        MsgBox "没有纪录!", vbOKOnly + vbExclamation, "警告"

        Exit Sub

End If

可能是因为我还是没搞懂eofbof到底代表了什么吧,虽然已经看了好多遍博客。

刚刚发现,原来改成这样就可以了:

If mrc.RecordCount > 0 Then

        mrc.MoveFirst

    Else: MsgBox "还木有记录哟"

    End If

Exit Sub

但是这有什么区别呢?

   看这个:http://www.doc88.com/p-31697947397.html
  评论这张
 
阅读(89)| 评论(34)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017