【正确答案】步骤1:单击工具栏的[新建]按钮,在[新建]对话框的[文件类型]区选择[表单]单选按钮,再单击[新建文件],打开表单设计器新建表单。此时单击表单,在[属性]窗口设置“Caption”为“外币持有情况查看”。单击[表单控件]窗口的“表格”控件,在表单中单击添加选项表格。利用相同的方法添加“选项按钮组”。在[窗口]中设置“ButtonCount”为“3”,然后右击“选项按钮组”选择“编辑”,单击“option1”,在[属性]窗口中设置“Caption”为“外币浏览”;单击“option2”,在[属性]窗口中设置“Caption”为“个人持有量”;单击“option3”,在[属性]窗口中设置“Caption”为“个人资产”。单击[表单控件]窗口的“命令按钮”,单击表单添加命令按钮,在[属性]窗口中设置“Caption”为“查看”。同样的方法设置[退出]命令按钮。 步骤2:右击表单选择“数据环境”,在[添加表或视图]中选择“rate_h1”,再单击[添加]按钮,选择“rate_s1”,接着单击[添加]按钮,再单击[关闭]按钮。 步骤3:右击[查看]按钮选择“代码”,编写命令按钮的Click事件代码。 DO CASE CASE THISFORM.OPTIONGROUP1.VALUE=1 THISFORM.GRID1.COLUMNCOUNT=3 THISFORM.GRID1.COLUMN1.HEADER1.CAPTION="姓名" THISFORM.GRID1.COLUMN2.HEADER1.CAPTION="外币代码" THISFORM.GRID1.COLUMN3.HEADER1.CAPTION="持有数量" THISFORM.GRID1.RECORDSOURCETYPE=4 THISFORM.GRID1.RECORDSOURCE="SELECT * FROM RATE HL INTO CURSOR TEMP" CASE THISFORM.OPTIONGROUP1.VALUE=2 THISFORM.GRID1.COLUMNCOUNT=3 THISFORM.GRID1.COLUMN1.HEADER1.CAPTION="姓名" THISFORM.GRID1.COLUMN2.HEADER1.CAPTION="外币名称" THISFORM.GRID1.COLUMN3.HEADER1.CAPTION="持有数量" THISFORM.GRID1.RECORDSOURCETYPE=4 THISFORM.GRID1.RECORDSOURCE="; SELECT RATE_SL.姓名,RATE_HL.外币名称,RATE_SL.持有数量; FROM RATE_HL INNER JOIN RATE_SL; ON RATE_SL.外币代码=RATE_HL.外币代码; ORDER BY RATE_SL.姓名 INTO CURSOR TEMP" CASE THISFORM.OPTIONGROUP1.VALUE=3 THISFORM.GRID1.COLUMNCOUNT=2 THISFORM.GRID1.COLUMN1.HEADER1.CAPTION="姓名" THISFORM.GRID1.COLUMN2.HEADER1.CAPTION="总资产" THISFORM.GRID1.RECORDSOURCETYPE=4 THISFORM.GRID1.RECORDSoURCE="; SELECT RATE_SL.姓名,SUM (RATE_HL.基准价* RATE_SL.持有数量) AS 总资产; FROM RATE_HL INNER JOIN RATE_SL; ON RATE_SL.外币代码=RATE_HL.外币代码; GROUP BY RATE_SL.姓名; ORDER BY RATE_SL.姓名 INTO CURSOR TEMP" ENDCASE THISFORM.REFRESH 右击[关闭]按钮选择“代码”,编写命令按钮的Click事件代码,如下所示。 THISFORM.RELEASE 步骤4:单击工具栏的[保存]按钮,名为“rateform”。右击表单,选择“执行表单”即可。