1、怎么实现升序或降序排列?
可以通过更改RecordSource属性来实现:
Data1.RecordSource = "select * from 表名 order by 字段名"
Data1.Refresh2、在插入新的纪录时我用data1.recordset.addnew,为什么插到了最后?怎样才可以在当前纪录后面插入纪录?
不清楚,好象不行。3、我用 Form1.Data1.Recordset.FindFirst "booksname='" & Text1.Text & "'"来查找纪录,查到的只有一个,怎样才可以将符合的纪录全都显示出来?
试试用第一种方法:
Data1.RecordSource = "select * from 表名 where booksname='" & Text1.Text & "'"
Data1.Refresh4、怎样知道数据库中一共有多少条记录?
Dim iCount As Integer
iCount = Data1.Recordset.RecordCount
'iCount即为记录数

解决方案 »

  1.   

    来晚了,全部被楼上回答了,sigh。2、在插入新的纪录时我用data1.recordset.addnew,为什么插到了最后?怎样才可以在当前纪录后面插入纪录?
    如果是Access或者SQL的数据库,就不存在楼主认为的“次序”或者“记录号”的概念了。3、我用 Form1.Data1.Recordset.FindFirst "booksname='" & Text1.Text & "'"来查找纪录,查到的只有一个,怎样才可以将符合的纪录全都显示出来?
    FindFirst/FindNext/FindPrevious/FindLast,这几个命令结合起来用也可以实现楼主希望的结果。如
    Form1.Data1.Recordset.FindFirst "booksname='" & Text1.Text & "'"
    Do Until Form1.Data1.Recordset.NoMatch
        '这里是其它的代码
        Form1.Data1.Recordset.FindNext "booksname='" & Text1.Text & "'"
    Loop