8-1.txt

超市进销存管理系统 学生学籍管理系统 1、把源代码解压到适当的目录下（教材讲到的目录）。 2、1-9章 打开对应章节例子代码复制到命令窗口

【例8.1】建立程序EXAM8-1.PRG，功能是求当前日期值的长度，并显示日期和长度值。
* 功能说明：求当前日期的长度
SET TALK OFF
cA1=DTOC(DATE())  &&将当前日期转换成字符串
nB1=LEN(cA1)  &&求长度
?cA1,nB1
SET TALK ON