Dates

How do i disable from seeing the time when i use this:

Dim CurrentDate As Date
.
.
.CurrentDate = Now
txtDate.Text = CurrentDate




cuz I ONLY WANT THE DATE NOT THE TIME....
CurrentDate= Date .........is not an option...:(

VB Code:

Dim CurrentDate As Date
CurrentDate = Now
txtDate.Text = CurrentDate.ToLongDateString
' or txtDate.Text = CurrentDate.ToShortDateString