建立永久关系 2.复制生成文本文件: CLOSE ALL USE ASC COPY TO XSXX SDF 3.建立关联、填充数据: CLOSE ALL SELECT 0 USE AST INDEX ON XH TO AST SELECT 0 USE ASC COPY TO AXK USE AXK MODI STRU &;&;插入第二个字段“XM” SET RELATION TO XH INTO AST REPLACE ALL XM WITH AST.XM CLOSE ALL 简单应用:
操作步骤如下: 1.选择“文件/新建”命令,新建一个项目,项目文件名为 PROJ1; 2.单击“代码”列表,并选中“程序”项,单击“添加”按钮,并选中考生文件夹下 MAIN.PRG,将该程序添加到项目中; 3.单击“
文档”列表,并选中“表单”项,单击“新建”按钮,新建一个表单; 4.在表单属性窗口中,Caption 设置为“成绩表单” ,Height 设置为 260,Width 设置 为 400; 5.在表单上右击,选择“数据环境” ,将 B01.DBF 表添加到数据环境中; 6.在控件窗口中选择下拉
列表框控件,在表单的适当位置拖放 Combo1,在其属性窗 口中,将 RowSourceType 设置为 6,RowSource 设置为 B01.,Style 设置为 2, 其 Click 事件参考代码如下: THISFORM.TEXT1.VALUE=成绩 7.在控件窗口中选择命令按钮控件,在表单的适当位置拖放,在其属性窗口中,将 Caption 设置为“关闭” ,其 Click 事件参考代码如下: RELEASE THISFORM 8.选择“文件/保存”命令,在弹出的对话框中将其保存到考生文件夹中,文件名为 SCRE1;
9.单击工具栏中的“运行”按钮运行该表单,调试通过后关闭表单设计窗口; 10.单击“连编”按钮,在“连编选项”对话框中选中“连编可执行文件” ; 11.单击“确定”按钮,在“另存为”对话框的应用程序名处输入“PROJ1” ; 12.单击“保存”按钮,完成连编
。 综合应用:
“退出” 项中结果选 “命令” 选项中填写 , “QUIT” “RETURN” “CANCEL” 或 或 ; 生成菜单程序,运行菜单并执行“计算”项。
第三套:
基本操作:
操作步骤: 1.使用 MODI COMM PROG1 命令进入编程窗口。 参考
程序: SET TALK OFF USE CCZF COPY TO NCZF USE NCZF SCAN ZFC=ZM ASCM=ASC(ZM) FOR I=1 TO 7 ZFC=ZFC+CHR(ASCM+I) NEXT I REPLACE ZF WITH ZFC ENDSCAN SET TALK ON 2.使用 CREATE MENU MENU1 命令创建菜单,建立菜单项“计算”和“退出” 。 “计算”项中结果选“命令” ,选项中填写“DO PROG1.PRG”或“DO PROG1” ;
参考答案: 为确保考试数据保存在考生文件夹下,建议启动 VFP 后,首先执行: SET DEFAULT TO 考生文件夹 1.复制数据表、追加记录: USE ASTUD COPY TO AST USE AST APPEND FROM AXSDA 2.建立索引: USE AXSDA INDEX ON 性别+ TAG XBXH &;&;或用表
设计器建立 CLOSE INDEX 3.统计与变量操作: USE AXSDA AVERAGE 入学分 TO PJF &;&;或用 CALCULATE AVG(入学分) TO PJF SAVE TO MPJF 简单应用:
操作步骤如下: 1.选择“文件/新建”命令,新建一个项目,项目文件名为 PROJ1; 2.单击“代码”列表,并选中“程序”项,单击“添加”按钮,并选中考生文件夹下 MAIN.PRG,将该程序添加到项目中; 3.单击“
文档”列表,并选中“表单”项,单击“新建”按钮,新建一个新表单; 4.在表单属性窗口中,Caption 设置为“字体
演示表单” ,Height 设置为 260,Width 设置为 400; 5.在表单控件工具栏中选择标签控件,在表单的适当位置拖放,在其属性窗口中,将 Caption 设置为“请输入文本内容” ; 6.在表单控件工具栏中选择文本框控件,在表单的适当位置拖放; 7.在表单控件工具栏中选择标签控件,在表单的适当位置拖放,在其属性窗口中, Caption 设置为“请选择字体” ; 8.在表单控件工具栏中选择选项按钮组控件,在表单的适当位置拖放,在其属性窗口
中,将 ButtonCount 设置为 4,其中四个选项按钮的 Caption 分别设置为“宋体”“隶 、 书”“黑体”和“楷体”,单选按钮组 Click 事件参考代码如下: 、 DO CASE CASE THIS.VALUE