Imports System
Public Class Program
Public Shared Sub Main()
Dim s As String = String.Format("{0:yyyy-MM-dd HH:mm:ss}", Date.Now)
Console.WriteLine(s)
Dim datetime as Date = Date.Now
s = datetime.ToString("yyyy-MM-dd HH:mm:ss")
Console.WriteLine(s)
Console.WriteLine(DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss"))
End Sub
End Class
' run:
'
' 2022-03-26 09:54:27
' 2022-03-26 09:54:27
' 2022-03-26 09:54:27
'