谁能讲一个 BookMark 属性的用法？(DataGrid)

Question

Book 属性示例 (DataGrid)
这个例子中，当用户删除非绑定 DataGrid 控件的一行数据时，UnboundDeleteRow 事件被触发，允许用户从数据集中手工删除该行，在本例中数据库是一个简单数组。下面的代码片断说明，如何在 UnboundDeleteRow 事件中将书签作为参数来传递，标识要删除的行。Private Sub DataGrid1_UnboundDeleteRow(Book As Variant)
    For i% = Book + 1 To RowCount - 1
        For j% = 0 to MAXCOLS - 1
            UserData(j%, I% - 1) = UserData(j%, I%)
        Next j%
    Next I%
End Sub

Answer 1

BookMark属性是当前记录的位置。
比如：
Dim RsPosition
Private Sub Command1_Click()
RsPosition = Adodc1.Recordset.Book
End SubPrivate Sub Command2_Click()
Adodc1.Recordset.Book = RsPosition
End Sub
在使用ado控件时，到了某一记录时，按下command1，这时RsPosition中记下了当前的记录位置。当你用ado控件移动记录指针后，想回到先前的记录位置，按下command2就回到前面记下的位置的记录.