对考生目录下的数据库“货币”建立文件名为“bd1”的表单。表单含有一个表格控件,用于显示用户查询的信息;表单上有一个页框,含有“外币浏览”“个人持有量”和“个人资产”3个选项卡;表单上有一个命令按钮,标题为“关闭”。 当选择“外币浏览”选项卡时,在

admin2010-08-26  48

问题 对考生目录下的数据库“货币”建立文件名为“bd1”的表单。表单含有一个表格控件,用于显示用户查询的信息;表单上有一个页框,含有“外币浏览”“个人持有量”和“个人资产”3个选项卡;表单上有一个命令按钮,标题为“关闭”。
    当选择“外币浏览”选项卡时,在表格中显示“汇率”表的全部字段;选择“个人持有量”选项卡时,表格中显示“数量”表中的“姓名”,“汇率”表中的“外币名称”和“数量”表中的“持有数量”;选择“个人资产”选项卡时,表格中显示“数量”表中每个人的“总资产”(总资产=每个人拥有的所有外币中的每种基准价*持有数量的总和)。
    单击“关闭”按钮退出表单。

选项

答案①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,单击表单控件工具栏上的“页框”控件图标,为表单添加一个页框PageFrame1,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加一个命令按钮Command1,单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件Grid1。 ②选择页框PageFrame1,在页框属性窗口中修改“PageCount”属性值为“3”,选择页框PageFrame1,单击右键,在弹出的快捷菜单中选择“编辑”,单击“Page1”,在页框属性窗口中修改“Caption”属性值为“外币浏览”;单击“Page2”,在页框属性窗口中修改“Caption”属性值为“个人持有量”;单击“Page3”,在页框属性窗口中修改“Caption”属性值为“个人资产”。 ③选择命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“关闭”,如图108-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。 [*] ④选择表格“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“""”,将“RecordsourceType”属性值修改为“1”。 ⑤选择页框PageFrame1,在页框属性窗口中双击“Click Event”打开Click事件过程代码编辑窗口,输入以下代码: ThisForm.Grid1.ColumnCount=1 DO CASE CASE ThisForm.PageFrame1.Activepage=1 SELECT*INTO CURSOR tmp FROM汇率 CASE ThisForm.PageFrame1.Activepage=2 SELECT姓名,汇率.外币名称,持有数量FROM汇率,数量INTO CURSOR tmp WHERE汇率.外币名称=数量.外币名称 CASE ThisForm.PageFramel.Activepage=3 SELECT姓名,汇率.外币名称,持有数量,SUM(持有数量*汇率)AS总资产INTO CURSOR tmp FROM汇率,数量WHERE汇率.外币名称=数量.外币名称GROUP BY姓名 ENDCASE ThisForm.Grid1.RecordSourceType=1 ThisForm.Grid1.RecordSource="tmp" ThisForm.Grid1.Refresh ⑥选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单义件名“bd1”,保存在考生文件夹下,然后运行表单。

解析
转载请注明原文地址:https://kaotiyun.com/show/m8zp777K
0

相关试题推荐
最新回复(0)