设计一个文件名和表单名均为rate的表单,表单的标题为“外汇汇率查询”,表单界面如图3-22所示,表单中有两个下拉列表框(Combol和Comb02),这两个下拉列表框的数据源类型(RowSourceType属性)均为字段,且数据源(RowSource属性

admin2017-03-29  55

问题 设计一个文件名和表单名均为rate的表单,表单的标题为“外汇汇率查询”,表单界面如图3-22所示,表单中有两个下拉列表框(Combol和Comb02),这两个下拉列表框的数据源类型(RowSourceType属性)均为字段,且数据源(RowSource属性)分别是外汇汇率表的“币种1”和“币种2”字段(不要给出表名前缀);另外有币种1 (Labe11)和币种2(Labe12)两个标签以及两个命令按钮“查询”(Commandl)和“退出”(Command2)。运行表单时,首先从两个下拉列表框选择币种,然后单击“查询”按钮用SQL语句从外汇汇率表中查询相应币种(匹配币种1和币种2)的信息,并将结果存储到表temp_rate中。单击“退出”按钮关闭表单。
要求:在“币种1”中选择“澳元”,在“币种2”中选择“美元”,单击查询按钮生成temp rate表。

选项

答案步骤1:命令窗口执行:OPEN DATABASE外汇,打开“外汇”数据库。 步骤2:命令窗口执行:CREATE FORM rate,打开表单设计器新建表单。 步骤3:右击表单选择【数据环境】打开表单数据环境,表单数据环境中右击选择【添加】,在“添加表或视图”对话框中双击“外汇汇率”表,将其添加到数据环境中。 步骤4:从“表单工具栏”中向表单添加两个标签、两个组合框和两个命令按钮。在“属性”面板的下拉框中选择表单对象,在“全部”选项卡中修改对象属性值,见表4—30。 [*] 步骤5:双击命令按钮,编写各个命令按钮的Click事件代码如下: *****“查询”按钮的Click事件代码***** IF USED("外汇代码") SELECT外汇代码 ELSE USE外汇代码 ENDIF LOCATE FOR外币名称=THISFORM. COMB01.VALUE MMl=外币代码 LOCATE FOR外币名称=THISFORM. COMB02.VALUE MM2=外币代码 SELECT*FROM RATE; WHERE币种1代码=MMl AND币种2代码=MM2; INTO TABLE temp rate *****“退出”按钮的Click事件代码***** THISFORM.RELEASE 步骤6:单击“常用”工具栏中的“运行”按钮运行表单。在“币种1”中选择“澳元”,在“币种2"中选择“美元”,单击“查询”按钮生成temp_rate表。 表单的事件、方法和属性;表单数据环境;基本型控件;程序基本结构;SQL简单查询。

解析 本题主要考查了表单及控件的常用属性的设置;locate查找语句和SQL简单查询。
组合框控件用于设置数据源类型和数据源的属性是RowSourceType和RowSource,将组合框设置为下拉列表框应将Style属性设置为“2—下拉列表框”。在指定数据源为表或表中字段时,应首先把表添加到表单数据环境中:另外,通过组合框的DisplayValue属性可以指定当前显示在组合框中的数据。
通过Locate查询在“代码”表中查找下拉框中外币名称对应的外币代码,并分别保存到两个变量中,然后再通过SQL查询语句进行查询。
转载请注明原文地址:https://jikaoti.com/ti/6pk0FFFM
0

最新回复(0)