Public Sub Main() Print Format(Now, "dddd dd mmmm yyyy hh:nn:ss") End