二、基本操作题
[操作步骤]
(1)利用“文件”菜单下的“打开”命令来打开考生文件夹
下的表单one，或使用命令“MODIFY FORM one”打开表单one。双击“显示”命令按钮，在其Click事件中输入代码：ThisForm.Text1.Value=year(date())保存并运行修改后的表单，查看运行结果。
(2)单击工具栏中的“打开”按钮，打开考生文件夹下的表单two，在“表单”菜单中选择“新建方法程序”命令，新建-个名为test的方法，在属性窗口中双击此方法，在弹出的窗口中编写用户自定义过程代码：ThisForm.Commandl.Enabled=.f.在表单设计器环境下双击“测试”命令按钮，编写Click事件代码：ThisForm.Test保存并运行修改后的表单，查看运行结果。
(3)单击工具栏中的“新建”按钮，在“新建”对话框中选择“报表”，单击“新建文件”按钮;选择“报表”菜单下的“快速报表”命令，在“打开”对话框中选择考生文件夹下的“课程表”，在“快速报表”对话框中单击“确定”按钮;单击工具栏中的“保存”按钮，将快速报表名保存为study_report.
(4)在命令窗口输入命令：alter table教师表alter职工号set check LEFT(职工号，3)=〝110〞按下回车键运行命令。
[易错误区]在Visual FoxPro中，新建的-个方法必须通过相应的语句调用才能使用。在第(2)小题中，按照题目要求新建test方法后，还需要在命令按钮的Click事件中对该方法进行调用。
三、简单应用题
(1)[操作步骤]
步骤1：单击工具栏中的“打开”按钮，打开考生文件夹下的数据库文件“课程管理”。
步骤2：单击工具栏中的“新建”按钮，新建-个程序，输入如下代码。
CREATE sql VIEW salary AS SELECT教师表.系号，AV
(教师表.工资)As平均工资FROM教师表;
GROUP BY教师表.系号0RDER BY 2 DESC
步骤3：保存程序为four.prg，并运行该程序。
(2)[操作步骤]
步骤1：单击工具栏中的“打开”按钮，打开考生文件夹下的表单six.SCX，“登录”按钮中的代码如下。
**********“登录”按钮的Click事件代码**********
USE用户表
GOTOP
flag=0
&&下面语句有错误
WHILE.NOT.EOF()
IF Alhrim(用户名)==Alltrim(Thisform.Tma1.Value)
IF Alltrim(口令)==Alhrim(Thisfonn.Texl2.Value)
WAIT”欢迎使用”WINDOW TIMEOUT 2
ELSE
WAIT”口令错误”WINDOW TIMEOUT 2
ENDIF
nag=l
EXIT
ENDIF
&&下面语句有错误
NEXT
ENDDO
&&下面语句有错误
CASE FLAG=0
WAIT”用户名错误”WINDOW TIMEOUT 2
ENDIF
********************************
步骤2：修改程序中的错误如下。
错误l：将“WHILE”改为“DO WHIIE”。
错误2：将“NEXT”改为“SKIP”。
错误3：将“CASE”改为“IF”。
步骤3：保存并运行表单。
四、综合应用题
在考生文件夹下完成下列操作：
(1)建立一个表单名和文件名均为my form的表单,如下图所示。表单的标题为“教师情况”,表单中有两个命令按钮(Command1和Command2),两个复选框(Check1和Check2)和两个单选按钮(Option1和Option2)。Command1和Command2的标题分别是“生成表”和“退出”,Check1和Check2的标题分别是“系名”和“工资”,Option1和Option2的标题分别是“按职工号升序’’和“按职工号降序”。
(2)为“生成表”命令按钮编写click事件代码,其功能根据单运行时复选框指定的字段和单选钮指定的排序方式生成新的自由表。如果两个复选框都被选中,生成的自由表命名为two.dbf,two.dbf的字段包括职工号、姓名、系名、工资和课程号;如果只有“系名”复选框被选中,生成的自由表命名为one_x.dbf,one_x.dbf的字段包括职工号、姓名、系名和课程号;如果只有“工资”复选框被选中,生成的自由表命名为one_xx.dbf,one_xx.dbf的字段包括职工号、姓名、工资和课程号。
(3)运行表单,并分别执行如下操作：
①选中两个复选框和“按职工号升序”单选钮,单击“生成表,,命令按钮。
②只选中“系名”复选框和“按职工号降序”单选钮,单击“生成表”命令按钮。
③只选中“工资”复选框和“按职工号降序”单选钮,单击“生成表”命令按钮。
