三、综合应用(1小题,计30分)
设计一个表单,所有控件的属性必须在表单设计器的属性窗口中设置,表单文件名为"外汇浏览",表单界面如下所示:

其中:
1. "输入姓名"为标签控件Label1;
2. 表单标题为"外汇查询";
3. 文本框的名称为Text1,用于输入要查询的姓名,如张三丰;
4. 表格控件的名称为Grid1,用于显示所查询人持有的外币名称和持有数量,RecordSourceType的属性为4(SQL说明);
5. "查询"命令按钮的名称为Command1,单击该按钮时在表格控件Grid1中按持有数量升序显示所查询人持有的外币名称和数量(如上图所示),并将结果存储在以姓名命名的DBF表文件中,如张三丰.DBF;
6. "退出"命令按钮的名称为Command2,单击该按钮时关闭表单。
完成以上表单设计后运行该表单,并分别查询"林诗因"、"张三丰"和"李寻欢"所持有的外币名称和持有数量。
解答:
先建立一空白表单。
添加控件到表单上。
在属性窗口设置属性。
标签的caption设为输入姓名
表单的caption设为外汇查询
表格控件的RecordSourceType的属性为4(SQL说明)
两个明令按扭的caption依次设为:查询和退出
编写事件代码
“查询”按扭的click代码如下:
x=allt(thisform.text1.value)
thisform.grid1.recordsourcetype=4
thisform.grid1.recordsource=;
"SELECT Rate_exchange.外币名称, Currency_sl.持有数量;
FROM 外汇管理!currency_sl INNER JOIN 外汇管理!rate_exchange ;
ON Currency_sl.外币代码 = Rate_exchange.外币代码;
WHERE Currency_sl.姓名 =x;
ORDER BY Currency_sl.持有数量;
INTO TABLE &x"
thisform.refresh
“退出”按扭的click代码:thisform.release
上面代码中的SQL部分可用“查询设计器”得到。
分别在文本框输入"林诗因"、"张三丰"和"李寻欢"运行。

(6)保存表单文件名为“外汇浏览”。
附数据表内容和结构如下:


[模拟试题]2010年计算机二级VFP上机第二套冲刺模拟及答案解析
[模拟试题]2010年计算机等考二级VFP上机第一套冲刺模拟及答案