应用题

设计一个表单“bd3”(表单标题为“外汇账户查询”),所有控件的属性必须在表单设计器的属性窗口中设置。表单有一个标签控件Labell(标题为“输入账户名称”)、一个文本框Textl(用于输入要查询的账户名称)、一个表格控件Gridl(用于显示所查询账户的外币名称、数量和买人价),两个命令按钮(“查询”和“关闭”),单击“查询”按钮时在表格控件Gridl中按数量升序显示所查询账户的外币名称、数量和买入价,并将结果存储在以账户名命名的“DBF”表文件中,单击“关闭”命令按钮关闭表单。
完成以上表单设计后运行该表单,并分别查询“账户A”、“账户B”和“账户C”所持有的外币名称、数量和买入价。

【正确答案】

【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,将Caption属性值修改为“外汇账户查询”,单击表单控件工具栏上的“标签”控件图标,为表单添加一个标签Label1,单击表单控件工具栏上的“文本框”控件图标,为表单添加1个文本框“Text1”,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1、Command2,单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件。
②选择标签Label1,在标签属性窗口中将标签Label1的Caption属性值修改为“输入账户名称”;分别选择两个命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“查询”;将命令按钮Command2的Caption属性值修改为“关闭”。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
③双击“查询”命令按钮,在Click事件中输入代码:
Aa=ThisForm.Text1.Value
SELECT货币名称,数量,买入价INTO TABLE&aa
FROM外汇账户,货币代码WHERE外汇账户.货币
代码=货币代码.货币代码AND账户=aa ORDER
BY数量
ThisForm.Grid1.RecordSourceType=0
ThisForm.Grid1.RecordSource=aa
ThisForm.Grid1.Refresh
④选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd3”,保存在考生文件夹下,然后运行表单。

【答案解析】