сохраните его как есть в базе данных .. как только вы прочитаете данные из базы данных в VB и назначите переменную, сделайте что-то вроде этого
Dim date1 As Date = #6/1/2008 7:47AM# // this value being read from the db
Console.WriteLine(date1.ToString())
используйте следующее:
' Get date-only portion of date, without its time.
Dim dateOnly As Date = date1.Date
' Display date using short date string.
Console.WriteLine(dateOnly.ToString("d"))
' Display date using 24-hour clock.
Console.WriteLine(dateOnly.ToString("g"))
Console.WriteLine(dateOnly.ToString("MM/dd/yyyy HH:mm"))
' The example displays the following output to the console:
' 6/1/2008 7:47:00 AM
' 6/1/2008
' 6/1/2008 12:00 AM
' 06/01/2008 00:00
или
Dim dtmTest As Date
dtmTest = DateValue(date1)