正确答案:
【考点指引】本大题主要考查表单的表格控件和选项按钮组控件的建立及使用,重点是表格数据源的设置。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“外汇持有情况”;单击表单控件工具栏上的“选项按钮组”控件图标,为表单添加一个选项按钮组0ptionGr
oup1;单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1和Command2;单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件“Grid1”。
②选择选项按钮组0ptionGroup1,单击右键,在弹出的快捷菜单中选择“生成器”打开选项按钮组生成器对话框,单击“按钮”选项卡,设置按钮的数目为3,在“标题”列下修改3个按钮的标题分别为“美元”、“英镑”和“港币”,单击“确定”按钮关闭命令组生成器对话框。
③分别选择两个命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“查询”,Command2的Caption属性值修改为“关闭”,如图63–1所示。“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
④选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“〝〞”,将“RecordsourceType”属性值修改为“1”。
⑤双击“查询”命令按钮,在Click事件中输入代码:
DO CASE
CASE ThisForm.Option Group1.value=1
SELECT外汇账户.*INTO CURSOR tmp FROM外汇账户,货币代码WHERE外汇账户.货币代码=货币代码.货币代码AND货币名称=〝美元〞
CASE ThisForm.Option Group1.value=2
SELECT外汇账户.*INTO CURSOR tmp FROM外汇账户,货币代码WHERE外汇账户.货币代码=货币代码.货币代码AND货币名称=〝英镑〞
CASE ThisForm.Option Group1.value=3
SELECT外汇账户.*INTO CURSoR tmp FROM外汇账户,货币代码WHERE外汇账户.货币代码=货币代码.货币代码AND货币名称=〝港币〞
ENDCASE
This Form.Grid1.Record SourceType=1
This Form.Grid1.Record Source=〝tmp〞
This Form.Grid1.Refresh
⑥选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd1”,保存在考生文件夹下,然后运行表单。