设计一个表单名和文件名均为currency form的表单,所有控件的属性必须存表单设计器的属性窗口中设置。表单的标题为:“外币市值情况”。表单中有两个文本框(text1和text2)和两个命令按钮:“查向”(command1)与“退出”(command2

admin2016-12-05  24

问题 设计一个表单名和文件名均为currency form的表单,所有控件的属性必须存表单设计器的属性窗口中设置。表单的标题为:“外币市值情况”。表单中有两个文本框(text1和text2)和两个命令按钮:“查向”(command1)与“退出”(command2)。
    运行表时,在文本框text1中输入某人的姓名,然后单击“查询”,则text2中会显示出他所持有的全部外币相当于人民币的价值数量。注意:某种外币相当于人民币数餐的计算公式:人民币价值数量=该种外币的“现钞买入价”*该种外币“持有数量”。
    单击“退出”按钮时关闭表单。

选项

答案【操作步骤】 步骤1:在命令窗口执行命令:CREATE FORM CURRENCY_FORM,打开表单设计器新建表单。向表单添加两个文本框和两个命令按钮控件。 步骤2:在“属性”面板的下拉框中选择表单对象,在“全部”选项卡中修改对象属性值,见表3—28。 [*] 步骤3:双击命令按钮,编写各个命令按钮的Click事件代码。各按钮代码如下: *****“查询”按钮的Click事件代码(以下SQL查询语句是通过查询设计器生成)***** 1 NAME=ALLTRIM(THISFORM.TEXT1.VALUE) 2 OPEN DATABASE RATE 3 USE CURRENCY_SL 4 LOCATE FOR 姓名=NANE 5 SUNM=0 6 DO WHILE NOT EOF() 7 SELECT 现钞买入价 FROM RATE_EXCHANGE; 8 WHERE RATE_EXCHANGE.外币代码=CURRENCY_SL.外币代码; 9 INTO ARRAY A 10 SUNN=SUMM+A[1]*CURRENCY_SL.持有数量 11 CONTIINUE 12 ENDDO 13 THISFORM.TEXT2.VALUE=SUMM *****“退出”按钮的Click事件代码***** THISFORM.RELEASE 步骤4:单击“常用”工具栏中的“运行”按钮查看结果,将表单文件保存到考生文件夹下。

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

最新回复(0)