Dim myDate As Date, strDate As String myDate = CDate("2021-01-28") strDate = Format(myDate, "YYYY-MM-DD") ' 2021-01-28 ' String to date myDate = CDate(Format$("20210213101235", "####-##-## ##:##:##")) ' Date to string strDate = Format(myDate, "YYYY-MM-DD hh:mm:ss") ' 2021-02-13 10:12:35
Dim iDate As String = "05/05/2005" Dim oDate As DateTime = Convert.ToDateTime(iDate) MsgBox(oDate.Day & " " & oDate.Month & " " & oDate.Year)