标题:关于myBookmark
只看楼主
t3crystal
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2006-7-26
 问题点数:0 回复次数:0 
关于myBookmark

关于 Dim myBookmark As Variant ,为什么要把标签定义成为变体数据型?

谁能帮我解释一下,为什么在下面这段代码中出现了很多的myBookmark = mrc.Bookmark和mrc.Bookmark = myBookmark,

它们之间有什么分别?

Private Sub cmdDelete_Click()
myBookmark = mrc.Bookmark
If MsgBox("是否删除当前记录?", 1, "删除当前记录") = vbOK Then
mrc.MoveNext
If mrc.EOF Then
mrc.MoveFirst
myBookmark = mrc.Bookmark
mrc.MoveLast
mrc.Delete
mrc.Bookmark = myBookmark
Call viewData
Else
myBookmark = mrc.Bookmark
mrc.MovePrevious
mrc.Delete
mrc.Bookmark = myBookmark
Call viewData
End If
Else
mrc.Bookmark = myBookmark
Call viewData
End If
End Sub

搜索更多相关主题的帖子: myBookmark 
2006-08-29 22:19



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-86853-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.206230 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved