Crystal Report - Urgente

resulta que estoy haciendo un reporte en visual basic, el me imprime por fecha de inicio y final, pero quiero que me lo saque tambien por el codigo del vehiculo, es decir, elegir la fecha de inicio y la final y colocar en una caja de texto el codigo del vehiculo. De todas formas sino me explico bien le voy a enviar el codigo que yo tengo, para que me digan que le hace falta.

Private Sub Command2_Click()
CrystalReport1.DataFiles(0) = App.Path + "\mantenimiento1.Mdb"
CrystalReport1.ReportFileName = App.Path + "\salidavehiculos.Rpt"
CrystalReport1.Formulas(0) = "DESDE='" & DTPicker1.Value & "'"
CrystalReport1.Formulas(1) = "HASTA='" & DTPicker2.Value & "'"
Y1 = Year(DTPicker1.Value)
Y2 = Year(DTPicker2.Value)
m1 = Month(DTPicker1.Value)
m2 = Month(DTPicker2.Value)
d1 = Day(DTPicker1.Value)
d2 = Day(DTPicker2.Value)
CrystalReport1.SelectionFormula = "{salidavehiculos.Fecha} in Date(" & Y1 & "," & m1 & "," & d1 & ") to Date(" & Y2 & "," & m2 & "," & d2 & ") startswith '" & Text1 & "'"
CrystalReport1.Action = 1
End Sub