怎么用电脑VFP打出 XX年XX月XX日星期X？

Question

如题所述

Answer 1

a=date()
b="日一二三四五六"
Y=LTRIM(str(YEAR(a))) + "年"
M=LTRIM(STR(MONTH(a))) +"月"
D=LTRIM(STR(DAY(a))) + "日"
W="星期"+SUBSTR(b,dow(a)*2-1,2)
MESSAGEBOX(y+m+d+w)

? y+m+d+w to print本回答被提问者和网友采纳

Answer 2