【操作步骤】
(1)单击工具栏中的"新建"按钮,新建一个文本文件,写入如下代码,保存文本文件为one,在命令窗口输入" DO one.txt",执行代码。
********one.txt中输入的代码********
SELECT 外币名称,现钞买入价,卖出价;
FROM rate_exchange;
INTO TABLE rate_ex.dbf
**********************************
(2)单击工具栏中的"新建"按钮,新建一个文本文件,写入下面的代码,保存文本文件为two。在命令窗口输入"DO two.txt",按下回车键执行代码。
********two.txt中输入的代码*********
Update Rate_exchange set 卖出价=829.01 where 外币名称='美元'
*************************
(3)单击工具栏上的"新建"按钮,打开"新建"对话框,文件类型选择"报表",单击"向导"按钮。在"向导取向"对话框中双击"报表向导",在"报表向导"步骤1中选择表rate_exchang,并将"外币名称"、"现钞买入价"和"卖出价"添加到"选定字段",连续单击"下一步"直到"步骤6-完成",输入报表标题"外币汇率",保存报表为"rate_exchange"。
(4)双击生成的报表文件rate_exchange,在报表设计器中,将显示在"标题" 区域的日期拖到"页注脚"区,保存报表文件即可
二、简单应用题
(1)【操作步骤】
步骤1:在命令窗口中输入"Create Form Timer",新建一个名为timer的表单。按题目要求添加一个标签控件、一个计时器控件和三个命令按钮控件。
步骤2:在属性窗口设置各控件的属性。设置表单的Caption属性为"时钟",Name属性为Timer,设置标签的Alignment属性为"2-中央",三个命令按扭的Caption属性依次为"暂停"、"继续"、退出,设置计时器控件的Interval属性为500。
步骤3:选中标签,然后执行"格式"→"对齐"菜单中的"水平居中"命令。
步骤4:双击命令按钮,为各命令按钮编写Click事件的代码:
******"暂停"按钮的Click事件代码******
ThisForm.Timer1.Interval=0
************************************
******"继续"按钮的Click事件代码*****
ThisForm.Timer1.Interval=500
***********************************
******"退出"按钮的Click事件代码*****
ThisForm.ReleaseWww.KaO8.CC
***********************************
******"计时器"的timer事件代码*******
ThisForm.Label1.Caption=time()
***********************************
步骤5:保存并运行表单查看结果。
(2)【操作步骤】
步骤1:单击工具栏中"新建"按钮,新建一个查询,并向查询中添加表currency_sl和rate_exchange。
步骤2:在"字段"选项卡中,将字段段"currency_sl.姓名"、" rate_exchange.外币名称"、" currency_sl.持有数量"、" rate_exchange.现钞买入价"和" Rate_exchange.现钞买入价*Currency_sl.持有数量"添加到"选定字段"。
步骤3:在"排序依据"选项卡中选择按"姓名"升序排序,再按"持有数量"降序排序。
步骤4:单击"查询"菜单下的"查询去向"命令,在"查询去向"对话框中选择表,输入表名为results。
步骤5:保存查询为query并运行查询。
三、综合应用题
【操作步骤】
步骤1:在命令窗口中输入" Create form Form1",创建一个表单,设置表单的Caption属性为"外汇"。在表单上添加一个页框控件和一个命令按钮。
步骤2:在表单的空白处右击,选择"数据环境"命令,将表 currency_sl 和rate_exchange添加到数据环境中。
步骤3:设置页框控件的PageCount属性为3,在页框控件上右击,在弹出的快捷菜单中选择"编辑"命令。将Page1的Caption属性修改为"持有人",从数据环境中拖拽表 currency_sl 到该页,同样将Page2的Caption属性修改为"外汇汇率",从数据环境中拖拽表rate_exchange"到该页,将Page3的Caption属性修改为"持有量及价值"。在页框上添加一个表格控件,修改表格控件的RecordSourceType属性为"3-查询",RecordSource属性为query。
步骤4:修改命令按钮的Caption属性为"退出",写入其Click事件代码:
ThisForm.Release
步骤5:保存并运行该表单。