使用2 DTpicker将MS Access数据库检索到vb6并过滤数据

的步骤如下：

1. 首先，确保你已经安装了Microsoft Access数据库驱动程序，并且在VB6项目中引用了该驱动程序。
2. 在VB6的窗体上添加两个DTpicker控件，用于选择起始日期和结束日期。
3. 在VB6中创建一个ADODB.Connection对象，用于连接到MS Access数据库。可以使用以下代码示例进行连接：

Dim conn As New ADODB.Connection
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\YourDatabase.mdb"
conn.Open

请注意，上述代码中的"YourDatabase.mdb"应替换为你的实际数据库文件路径。

1. 创建一个ADODB.Recordset对象，用于执行数据库查询和过滤数据。可以使用以下代码示例：

Dim rs As New ADODB.Recordset
Dim sql As String

' 根据DTpicker选择的日期范围构建SQL查询语句
sql = "SELECT * FROM YourTable WHERE DateField >= #" & DTpicker1.Value & "# AND DateField <= #" & DTpicker2.Value & "#"

' 执行查询
rs.Open sql, conn, adOpenStatic, adLockOptimistic

请注意，上述代码中的"YourTable"应替换为你的实际表名，"DateField"应替换为你的实际日期字段名。

1. 使用rs对象遍历和处理查询结果。例如，可以将查询结果显示在VB6的列表框(ListBox)控件中：

Do Until rs.EOF
    ListBox1.AddItem rs.Fields("FieldName").Value
    rs.MoveNext
Loop

请注意，上述代码中的"FieldName"应替换为你的实际字段名。

1. 最后，记得在适当的时候关闭数据库连接和释放对象资源：

rs.Close
Set rs = Nothing

conn.Close
Set conn = Nothing

这样，你就可以使用2 DTpicker将MS Access数据库检索到vb6并过滤数据了。

对于MS Access数据库的更多信息和使用方法，你可以参考腾讯云的云数据库SQL Server产品（https://cloud.tencent.com/product/sqlserver）和云数据库MySQL产品（https://cloud.tencent.com/product/cdb_mysql）。

请注意，以上答案仅供参考，具体实现可能因个人需求和环境而异。