数据库之mybook=mrcbook——书签的应用

在做学生管理系统的过程中，发现每个eof和bof运用时总会出现bookmark这个单词，使程序调动更简洁的存在，发挥着神奇的功效，我就研究了一下，这是我的简单研究成果！

书签就是用来做标记的，让我们更好的控制使用数据表，记录当前的位置，也可以看到想看的数据的位置，也可以判断是不是为空集，也可以自己定义书签，来实现数据的删除，查看等功能！

在了解书签之前，大家需先明白bof和eof的含义与作用！这是李社河师哥的csdn对其的讲解：http://blog.csdn.net/lishehe/article/details/7844809/

然后我们再说一下我们书签的具体事例：

private sub deletecommand_click ()  
	mybookmark=mrc.bookmark  
	str=msgbox ("删不删除在你喽，我不勉强！",vbokcancel,"删除当前记录"  
	if str=vbok then  
	      	mrc.moveNext  
	        if mrc.eof then'要删除的记录肯定是左后一个（是不是第一个还不确定）。  
	            mrc.movefirst  
	            mybookmark=mrc.bookmark '对第一条做标签   
	            mrc.movelast  
	            mrc.delete  
	            mrc.bookmark=mybookmark  '让记录显示回到先前定义书签的位置
			If mybookmark=0  then      '你将标签给第一条记录，但是第一条记录是空（要删除的记录肯定是一个唯一的记录）   
	                        
				Msgbox"您将删除最后一条记录","提示"  
	  
	                Exit sub  
	  
	             	End if  
	            call viewdata  
	        else   ' 要删除的记录不是最后一条   
	             mybookmark=mrc.bookmark '给mrc.movenext 做标签  
	             mrc.moveprevious  '回到要删除的记录 
	             mrc.delete  
.	             mrc.bookmark=mybookmark  '让记录显示回到先前定义书签的位置
	 	     	If mybookmark=0  then      '你将标签给第一条记录，但是第一条记录是空（要删除的记录肯定是一个唯一的记录）   
	                        
				Msgbox"您将删除最后一条记录","提示"  
	  
	                Exit sub  
	  
	             	End if  
	  
	
	             call viewdata  
	        end if   
	 else  
	       mybookmark=mrc.bookmark  '取消删除记录   
	       call viewdata  '让记录显示刚开始定义的书签位置
	end if   
end sub

   

 

希望大家多多提出意见，有不对的帮忙指正~