![]() |
BCX Console Demonstration Program S78.bas |
DIM
stAS
SYSTEMTIMEDIM
d$DIM
t$DIM
s$ GetLocalTime(
&
st)
GetDateFormat(
LOCALE_USER_DEFAULT, DATE_LONGDATE,&
st,NULL,d$,64
)
GetDateFormat(
LOCALE_USER_DEFAULT, DATE_SHORTDATE,&
st,NULL,s$,64
)
GetTimeFormat(
LOCALE_USER_DEFAULT, TIME_NOSECONDS,&
st,NULL,t$,64
)
", "
, d$," ("
, s$ ,")"