学生信息管理系统（二）删除信息

最新推荐文章于 2022-10-11 08:51:19 发布

zeyx

最新推荐文章于 2022-10-11 08:51:19 发布

阅读量4.5k

点赞数 1

分类专栏： .NET

本文链接：https://blog.csdn.net/u010928364/article/details/10086951

版权

1.先分析下删除的过程。
假设现在已经添加了记录,3个记录.当前显示第一个记录时,删除.指针向下移动显示第二个记录。第二个同理。但当前显示第三个记录时,删除第三个,指针指向EOF,这不是是我们想要的，我们要的是删除第三个记录后，显示第一个记录。
图1解：

代码如下：

代码（1）
Private Sub deleteCommand_Click()      
   myBookmark = mrc.Bookmark     '对当前显示的记录作为标签
   str2$ = MsgBox("是否删除当前记录？", vbOKCancel, "删除当前记录") 
                           '单击删除按钮时弹出对话框提示是否删除当前记录
    
       If str2$ = vbOK Then            '如果删除当前记录 
           mrc.MoveNext            '记录指针指向下一个记录
          
            If mrc.EOF Then     '如果EOF为真则说明刚开始显示的记录是记