1) Thuộc tính BookMark Ý nghĩa : chứa một giá trị chuỗi dùng để nhận diện vị trí con trỏ mẫu tin trong bộ mẫu tin. Cú pháp : DoituongRecordset.BookMark Thí dụ : Sử dụng thuộc tính BookMark để lưu lại mẫu tin hiện hành trước khi quét lần lượt qua mẫu tin và sau đó quay trở lại đúng mẫu tin đó. Sub UseBookmark() Dim db as database Dim rstsv as Recordset Dim vnPosition as Variant Set db = Currentdb() Set rstsv = db.OpenRecordset(“sinhvien”,dbOpenDynaset ) vnPosition = rstsv.Bookmark Debug.Print “Ma so truoc khi di chuyen”&rstsv![Masv] Do while Not rstsv.EOF Degug.Print rstsv![Masv] Rstsv.MoveNext Loop Rstsv.Bookmark = vnPosition Debug.Print “Ma so sau khi di chuyen:”&rstsv![masv] End Sub . 1) Thuộc tính BookMark Ý nghĩa : chứa một giá trị chuỗi dùng để nhận diện vị trí con trỏ mẫu tin trong bộ mẫu tin. Cú pháp : DoituongRecordset .BookMark Thí dụ : Sử dụng thuộc tính BookMark. UseBookmark() Dim db as database Dim rstsv as Recordset Dim vnPosition as Variant Set db = Currentdb() Set rstsv = db.OpenRecordset(“sinhvien”,dbOpenDynaset ) vnPosition = rstsv .Bookmark. chuyen”&rstsv![Masv] Do while Not rstsv.EOF Degug.Print rstsv![Masv] Rstsv.MoveNext Loop Rstsv .Bookmark = vnPosition Debug.Print “Ma so sau khi di chuyen:”&rstsv![masv] End Sub