Here is my code:

Dim DateD
DateStr = "July 17, 2001"
DateD = CDate(DateStr)
...

Running it VB reports a run time error Type Mismatch. What is wrong?