设计一个文件名和表单名均为myaccount的表单。表单的标题为“外汇持有情况”。表单中有一个选项按钮组控件(myOption)、一个表格控件(Grid1)以及两个命令按钮“查询”(Command1)和“退出”(Command2)。其中,选项按钮组控件有两

admin2016-12-05  40

问题 设计一个文件名和表单名均为myaccount的表单。表单的标题为“外汇持有情况”。表单中有一个选项按钮组控件(myOption)、一个表格控件(Grid1)以及两个命令按钮“查询”(Command1)和“退出”(Command2)。其中,选项按钮组控件有两个按钮“现汇”(Option1)、“现钞”(Option2)。
    运行表单时,首先在选项组控件中选择“现钞”或“现汇”,单击“查询”命令按钮后,根据选项组控件的选择将“外汇账户”表的“现钞”或“现汇”(根据钞汇标志字段确定)的情况显示在表格控件中。如图2—22所示。
    单击“退出”按钮,关闭并释放表单。
    注:在表单设计器中将表格控件Grid1的数据源类型设置为“SOL说明”。

选项

答案【操作步骤】 步骤1:命令窗口执行:CREATE FORM myaccount,打开表单设计器新建表单。向表单添加一个选项按钮组、一个表格及两个命令按钮控件。 步骤2:选择表单对象,修改对象属性值,见表3—24。 [*] 步骤3:双击命令按钮,编写各个命令按钮的Click事件代码。各按钮代码如下: *****“查询”按钮的Click事件代码(以下SQL查询语句是通过查询设计器生成)***** 1 DO CASE 2 CASE THISFORM.MYOPTION. VALUE=1 && 当选择选项组第一个选项时 3 THISFORM.GRID1.RECORDSOURCE=" SELECT 外汇账户.外币代码,外汇账户.金额; 4 FROM 外汇!外汇账户; 5 WHERE 外汇账户.钞汇标志=’现汇’; && 此处注意字符串的定界符要与双引号定界符不同 6 INTO CURSOR temp" && 将查询结果输出到临时表temp中 7 CASE THISFORM.MYOPTION.VALUE=2 && 当选择选项组第二个选项时 8 THISFORM.GRID1.RECORDSOURCE=" SELECT 外汇账户.外币代码,外汇账户.金额; 9 FROM 外汇!外汇账户; 10 WHERE 外汇账户.钞汇标志=’现钞’; && 此处注意字符串的定界符要与双引号定界符不同 11 INTO CURSOR TEMP" && 将查询结果输出到临时表temp中 12 ENDCASE *****“退出”按钮的Click事件代码***** THISFCORM.RELEASE 步骤4:单击“常用”工具栏中的“运行”按钮查看结果,将表单文件保存到考生文件夹下。

解析
转载请注明原文地址:https://jikaoti.com/ti/RLk0FFFM
0

最新回复(0)