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

admin2013-10-22  34

问题     设计一个文件名和表单名均为myaccount的表单。表单的标题为“外汇持有情况”。表单中有一个选项按钮组控件(myOption)、一个表格控件(Gridl)以及两个命令按钮“查询”(Commandl)和“退出”(Command2)。其中,选项按钮组控件有两个按钮“现汇”(Optionl)、“现钞”(Option2)。
    运行表单时,首先在选项组控件中选择“现钞”或“现汇”,单击“查询”命令按钮后,根据选项组控件的选择将“外汇账户”表的“现钞”或“现汇”(根据钞汇标志字段确定)的情况显示在表格控件中。如下图所示。

    单击“退出”按钮,关闭并释放表单。
注:在表单设计器中将表格控件Gridl的数据源类型设置为“SQL说明”。

选项

答案步骤1:在命令窗口执行命令:CREATE FORM myaccount,打开表单设计器新建表单。从“表单控件”工具栏中依次向表单添加一个选项按钮组、一个表格及两个命令按钮控件。 步骤2:在“属性”面板的下拉框中选择表单对象,在“全部”选项卡中修改对象属性值,见表3。 [*] 步骤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事件代码** THISFORM.RELEASE 步骤4:单击“常用”工具栏中的“运行”按钮查看结果,将表单文件保存到考生文件夹下。

解析 本大题考查了表单及控件的常用属性和方法的设置;程序的分支结构;SQL.简单查询.
    对本题操作时,首先根据题意新建表单、添加控件并修改相关属性。修改选项组单选按钮的标题属性值时,要注意选项组处于“编辑”状态,能单独选定选项组中的按钮,否则“属性”面板中不会出现CaptiOil属性,另外,由于表格(Gridl)显示的是查询结果的值,因此数据源类型(RecordSourceType)应为“4-SQL说明”,用来显示查询生成的临时表记录。
    由于查询是根据选项组中单个选项进行操作的,因此需要判断单击时被选定的是哪个单选项来执行相应的功能。选项组中获得当前被选中单选项的返回值属性是Value,当选项组的Value值为1时表示被选定的是第一个单选项,Value值为2时表示被选定的是第二个单选项。在进行代码设计时,可以通过DO CASE分支结构判断当前被选定的是哪个单选项,并完成该单选项所对应执行的功能。
    SQX.程序设计部分考查的是SQL简单查询,属于最简单的查询语句。注意:查询条件表达式中字符串定界符要与指定表格数据源使用的字符定界符不同。
转载请注明原文地址:https://kaotiyun.com/show/TDop777K
0

最新回复(0)