Dato i Vb

Jeg har skrevet det lille program,  fordi jeg har problemer med DATOER jeg har skrevet en kassekladde i Access fra 01-01-2001 til 01-04-2001 i den første nedenstående program jeg bruger en tekst box nemlig Text1 for at få de sidste dato i kassekladde som den er I Tabel som jeg kalder Nye i det tilfælde vil det være 01-04-2001 og den vil jeg flytte ind i Tabellet som hedder Nyekladde problemet er  den vil ikke .hvis jeg skriver = og peger på 01-04-2001 så sker der ingenting ,hvis jeg skriver >= så kommer hele indholdet, hvis <= Kun 01-01-2001,Hvis < kun 01-01-2001 hvis > så kommer hele indholdet.
Det mærkelige er hvis jeg peger på en anden Dato end 01-04-2001 ,så virker det rigtig ??????
Er der nogen som kan fortælle mig det?????? 

Private Sub Command1_Click()
Form1.Adodc2.CommandType = adCmdText
Form1.Adodc2.RecordSource = \"select * from nye order by dato \"
Form1.Adodc2.Refresh
Form1.Adodc2.Recordset.MoveLast
\'**************************
Dim dbs As Database

    Set dbs = OpenDatabase(C:\\Contas.mdb)
    dbs.Execute \" INSERT INTO NyeKladde \" _
    & \"SELECT * \" _
    & \"FROM [Nye]WHERE dato =\" & Chr(35) & Text1 & Chr(35) & \"order by Dato\"
Form1.Adodc1.Refresh