How to Query for Dates Using a SQL Statement in Visual Basic

The information in this article applies to:

• Professional and Enterprise Editions of Microsoft Visual Basic, 16-bit only, for Windows, version 4.0
• Standard and Professional Editions of Microsoft Visual Basic for Windows, version 3.0

SUMMARY

When you query for Dates in a Microsoft Access database, you may receive an incorrect result or a 'Type Mismatch' error message. To query for a date in a SQL statement in Visual Basic for Windows, enclose the date in pound signs (#).

NOTE: This article shows dates written in American format (MM/DD/YY). For example, 12/31/60 means December 31, 1960.

MORE INFORMATION

The following example code selects every field from the Employees table in the NWIND.MDB sample database where the field Birth Date is greater than 12/31/60. NWIND.MDB is the Microsoft Access sample database provided with Microsoft Access versions 1.0 and 1.1, and 2.0.

   ' Data1 is a data control.
   Data1.DataBase = "C:\ACCESS\NWIND.MDB"
   ' Enter the following two lines as one, single line:
   Data1.RecordSource = "SELECT * FROM Employees
      WHERE [Birth Date] > #12/31/60#"
   Data1.Refresh

   ' The following example uses FindFirst with the same Data Control:
   Data1.RecordSet.FindFirst "[Hire Date] <= #9/21/92#"