内存变量作用范围及参数传递

1、l一、内存变量作用范围及参数传递一、内存变量作用范围及参数传递 &MAIN.PRGX1=1 X2=2 DO P1 WITH X1，X2?X1=+STR(X1，1)?X2=+STR(X2，1)X1=1X2=2DO P1 WITH X1，X1+X2? X1=+STR(X1，1)? X2=+STR(X2，1)RETURN &P1.PRGPARA W1，W2PRIVATE W1W1=W1*3W2=W2*4RETURNIF A(I)=A(J) T=A(I) A(I) =A(J) A(J)=T ENDIF J=J+1 ENDDO ?A(I) I=I+1 ENDDO ?A(I) CLEARD

2、IME A(20) P=1 DO WHILE P=20 A(P)=INT(RAND( )*100+1) P=P+1 ENDDO I=1 DO WHILE I=19 J=I+1 DO WHILE J=20创建一个检查口令输入的表单，口令设置为创建一个检查口令输入的表单，口令设置为“ABCD”ABCD”，要求，要求: :v开始运行时，开始运行时，LABEL2LABEL2不显示任何信息，在前两次输入口令错误时显不显示任何信息，在前两次输入口令错误时显示示“口令错，请重新输入口令口令错，请重新输入口令!”!”，第三次输入口令错误时显示，第三次输入口令错误时显示“对对不起，您无权使用本系统不起，您无权使

3、用本系统!”!”。如果口令输入正确，则显示。如果口令输入正确，则显示“欢迎使欢迎使用本系统用本系统”。v单击单击“确定确定”按钮按钮(COMMAND1)(COMMAND1)时，检查用户输入口令的正确性及输时，检查用户输入口令的正确性及输入次数，口令三次输入错误时，处于禁用状态。入次数，口令三次输入错误时，处于禁用状态。v单击单击“关闭关闭”按钮按钮(COMMAND2)(COMMAND2)时，关闭本表单。时，关闭本表单。l设有以下两个数据表：设有以下两个数据表：KSCJK.DBFKSCJK.DBF和和CJ.DBFCJ.DBF。 考生综合成绩表（考生综合成绩表（KSCJK.DBFKSCJK.DBF

4、）：）：考号考号 姓名姓名 学院学院 笔试笔试 上机上机 综合综合A001 A001 张小燕张小燕 水电学院水电学院A003 A003 李飞李飞 计算机学院计算机学院A002 A002 王晓明王晓明 外语学院外语学院A004 A004 晓华晓华 信息工程学院信息工程学院A005 A005 李大明李大明 计算机学院计算机学院成绩表（成绩表（CJ.DBFCJ.DBF）：）：考号考号 笔试笔试 上机上机A001 65 60A001 65 60A003 84 56A003 84 56A002 78 88A002 78 88A004 95 92A004 95 92 A005 50 49 A005 50

5、49 请编写程序（请编写程序（ABC1.PRGABC1.PRG）实现如下操作：）实现如下操作：(1)(1)用用CJ.DBFCJ.DBF中的笔试和上机成绩，修改中的笔试和上机成绩，修改KSCJK.DBFKSCJK.DBF库中的笔试和上库中的笔试和上机字段。机字段。(2)(2)计算综合成绩（综合计算公式为笔试占计算综合成绩（综合计算公式为笔试占60%60%，上机占，上机占40%40%）。）。(3)(3)显示显示KSCJK.DBFKSCJK.DBF表所有通过考生的考号，姓名，院系，综合。表所有通过考生的考号，姓名，院系，综合。(4)(4)显示格式为：显示格式为： 本次考试通过考生名单本次考试通过考生名单 = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 考号考号 姓名姓名 院系院系 综合综合 A001 A001 张小燕张小燕 水电学院水电学院 6363 A002 A00