Private Sub Command1_Click() Adodc1.RecordSource = "select * from Test1 where BDate between BDate >= '" & (Dt1.Value) & "' and BDate <= '" & (Dt2.Value) & "'" Adodc1.Refresh End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)