VB中ADO控件与datagrid控件对access数据库操作的一些问题，谢谢点开

这是form load事件里面的
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\电池状态表.mdb;Persist Security Info=False" '设置数据库路径
Adodc1.CommandType = adCmdText '设置记录源
Adodc1.RecordSource = "select * from 电池状态" '连接数据库的message表文件
Set DataGrid1.DataSource = Adodc1

这是在定时器事件中的（我是每隔一段时间对数据库中存4个数据，即一行4个数据，其中第一个是时间）
Adodc1.Recordset.AddNew
 Adodc1.Recordset.Fields(0) = FormatDateTime(Now)
 Adodc1.Recordset.Fields(1) = Text7(0).Text '不用for
 Adodc1.Recordset.Fields(2) = Text7(1).Text
 Adodc1.Recordset.Fields(3) = Text7(2).Text
    Adodc1.Recordset.Update
   Adodc1.Refresh
现在问题是
1.我的datagrid里面直接把数据库里面的所有数据读进来了，当超过1500条时就看不见了（数据库里面存在）
2.我现在想做一个查询功能，差一个时间段，就能把这个时间段里面的所有行数据读出来
3.或者不做第2个功能了，直接做成每页1000条数据，做20页，不用查询，自己手动翻查
  最好做成第3钟     --------------------编程问答-------------------- --------------------编程问答-------------------- 如果你的数据库内的数据有记录时间的字段，你就可以直接按时间查询了

补充：VB ,  数据库(包含打印，安装，报表)