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

admin2014-11-30  38

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

选项

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

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

最新回复(0)