考试网 >> IT认证 >> 等级 >> 等级动态 >> 在Recordset对象中查询记录的方法

发布时间：2006-07-25 12:02     点击：

              CursorType:=adOpenKeyset, _

              LockType:=adLockOptimistic 

        " Find the first record that meets the criteria.

        .Find Criteria:=strCriteria, SearchDirection:=adSearchForward        

        " Make sure record was found (not at end of file).

        If Not .EOF Then

            " Print the first record and all remaining

            " records that meet the criteria.

            Do While Not .EOF

                Debug.Print .Fields(strDisplayField).Value

                " Skip the current record and find next match.

                .Find Criteria:=strCriteria, SkipRecords:=1

            Loop

        Else

发表评论： 匿名发表 用户名: 查看评论

您将承担一切因您的行为、言论而直接或间接导致的民事或刑事法律责任 留言板管理人员有权保留或删除其管辖留言中的任意内容 本站提醒：不要进行人身攻击。谢谢配合。