2010年计算机等考二级VF上机冲刺模拟试题(34)

　　三、综合应用(1小题，计30分)

　　在考生文件夹下，打开公司销售数据库SELLDB，完成如下综合应用：

　　设计一个表单名为Form_one、表单文件名为SD_SELECT、表单标题名为"部门年度数据查询"的表单，其表单界面如图所示。

　　其他要求如下：

　　1.为表单建立数据环境，向数据环境添加S_T表(Cursor1)。

　　2.当在"年度"标签右边的微调控件中(Spinner1)选择年度并单击"查询"按钮(Command1)时，则会在下边的表格(Grid1)控件内显示该年度各部门的四个季度的销售额和利润。指定微调控件上箭头按钮(SpinnerHighValue属性)与下箭头按钮(SpinnerLowValue属性)值范围为2010-1999，缺省值(Value属性)为2003，增量(Imcrement属性)为1。

　　3.单击"退出"按钮(Command2)时，关闭表单。

　　要求：表格控件的RecordSourceType属性设置为"4-SQL说明"。

　　解答：

　　新建表单，用指定的文件名存盘，将表单的name属性设置为Form_one，标题设置为："部门年度数据查询"，添加控件，设置其基本属性，添加数据环境，设置“查询”按钮的Click事件代码为：

　　ab=str(thisform.spinner1.value,4)

　　thisform.grid1.recordsource="sele * from s_t where 年度=ab into curs tmp"

　　设置“退出”的Click事件代码为：

　　thisform.release

　　附：本题相关表