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