VB 时间段查询

按日期查询ok
 Data2.RecordSource = "select 输出地点,检测日期,采集时间,运行状况,电压A,电压B,电压C,电流A,电流B,电流C from 检测电压电流 where 输出地点='" & DBCombo1.Text & "' and 检测日期  between" + Chr(35) + Str(DTPicker1.Value) + Chr(35) + "and" + Chr(35) + Str(DTPicker2.Value) + Chr(35) + "order by 检测日期"
按时间（hh:mm:ss）出错代码
Data2.RecordSource = "select 输出地点,检测日期,采集时间,运行状况,电压A,电压B,电压C,电流A,电流B,电流C from 检测电压电流 where 输出地点='" & DBCombo1.Text & "' and 采集时间  between" + Chr(35) + Str(DTPicker3.Value) + Chr(35) + "and" + Chr(35) + Str(DTPicker4.Value) + Chr(35) + "order by 采集时间"  '时间格式（DTPicker4.Value）00：00：00 --------------------编程问答-------------------- 要从日期字段里截取时间部分，才能取到时间。
另外，between后面也要加空格，and后也要加空格。

--------------------编程问答-------------------- 你写的什么

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