RosettaCodeData/Task/Date-format/BASIC/date-format.basic

7 lines
129 B
Text
Raw Permalink Normal View History

2013-04-10 16:57:12 -07:00
#include "vbcompat.bi"
DIM today As Double = Now()
PRINT Format(today, "yyyy-mm-dd")
PRINT Format(today, "dddd, mmmm d, yyyy")