第22套
一、
1. 打开并修改数据库
MODIFY DATABASE 外汇
2. 在“数据库设计器-外汇”中，选择表“外汇代码”并单击鼠标右键，选择“修改”命令，在“表设计器-外汇代码.dbf”中，单击“索引”选项卡，然后输入索引名“外币代码”，选择类型为“主索引”，表达式为“外币代码”，最后单击“确定”按钮，再单击“是(Y)”这样索引就建立了。
3. 在“数据库设计器-外汇”中，选择表“外汇代码”并单击鼠标右键，选择“修改”命令，在“表设计器-外汇账户.dbf”中，单击“索引”选项卡，然后输入索引名“外币代码”，选择类型为“普通的索引”，表达式为“外币代码”，最后单击“确定”按钮，再单击“是(Y)”这样索引就建立了。
4. 在“数据库设计器-外汇”中，然后选择“外币代码”表中主索引键“外币代码”并按住不放，然后移动鼠标拖到“外汇账户”表中的索引键为“外币代码”处，松开鼠标即可。
一、命令方式：启动Visual Foxpro系统后，在命令窗口中输入
CREATE PROJECT 外汇管理
二、可以使用菜单方式进行建立
1. 单击“文件\新建”命令项，弹出“新建”对话框。
2. 在“新建”对话框中，选择“项目”单选钮，再按“新建文件”按钮，弹出“创建”对话框。
3. 在“创建”对话框中输入项目文件名“外汇管理”，再按回车键或按“保存”按钮，这样就可以建立项目文件了，并出现“项目管理器”对话框。
4. 在项目管理器中的“数据”选项卡中，选择“数据库”，单击“添加”按钮。
5. 在“打开”对话框中，选定库文件“外汇.dbc”，然后单击“确定”命令按钮即可。
1. 打开并修改菜单
MODIFY MENU mymenu
2. 在“菜单设计器-mymenu.mnx”中，选择菜单“文件”并单击“编辑”按钮，再选择子菜单“查找”并修改其菜单项为“查找\ 在文件one.prg中存放： delete from rate where 币种1代码="14" AND 币种2代码="27" 二、 SELECT 钞汇标志,金额 FROM 外汇账户 WHERE 外币代码="27" ORDER BY 金额 DESC INTO TABLE two 1. 单击“工具\向导\报表”菜单项，并显示“向导选取”对话框。 2. 在“向导选取”对话框中，选择“一对多报表向导”并单击“确定”按钮，并显示“一对多报表向导”对话框。 3. 在“一对多报表向导”对话框的“步骤1-从父表选择字段”中，首先要选取表“外汇代码”，在“数据库和表”列表框中，选择表“外汇代码”，接着在“可用字段”列表框中显示表“外汇代码”的所有字段名，并选定所有字段至“选定字段”列表框中，单击“下一步”按钮。 4. “一对多报表向导”对话框的“步骤2-从子表选择字段”中，首先要选取表“外汇账户”，在“数据库和表”列表框中，选择表“外汇账户”，接着在“可用字段”列表框中显示表“外汇账户”的所有字段名，并选定选定所有字段落至“选定字段”列表框中，单击“下一步”按钮。 5. 在“一对多报表向导”对话框的“步骤3-为表建立关系”中，单击“下一步”按钮。 6. 在“一对多报表向导”对话框的“步骤4-排序记录”中，选择“外币代码”和选择“升序”单选按钮，再单击“添加”按钮，单击“下一步”按钮。 7. 在“一对多报表向导”对话框的“步骤5-选择报表样式”中，选择“帐务式”，方向选择“横向”，单击“下一步”按钮。 8. 在“一对多报表向导”对话框的“步骤6-完成”中，在“报表标题”文本框中输入“外汇账户情况”，单击“完成”。 9. 在“另存为”对话框中，输入保存报表名“report_account”，再单击“保存”按钮，最后报表就生成了。 10. 修改报表 MODIFY REPORT report_account 在“报表设计器-report_account.frx”中，打开“报表控件”，选中“图片/ActiveX绑定控件”，在报表标题带区建立一个图片，在“报表图片”对话框的图片来源框中选择“文件”并选择考生文件夹下的“picture.gif”，再按“确定”按钮，回到“报表图片”对话框中，再按“确定”按钮。 11. 最后保存该报表。 三、 1. 建立表单 CREATE FORM rate 2. 在“表单设计器”中，在“属性”的Caption处输入“外汇汇率查询”，在Name处输入“rate”。 3. 在“表单设计器”中，添加两个标签，在第1个标签Lable1“属性”的Caption处输入“币种1”，在第2个标签Lable2“属性”的Caption处输入“币种2”。 4.在“表单设计器”中，单击鼠标右键，在弹出菜单中选择“数据环境”，在“数据环境设计器-rate.scx”中，在“打开”对话框中，选择“外汇汇率.dbf”表，接着在“添加表或视图”的对话框中，按“关闭”按钮，关闭“添加表或视图”对话框。 5. 在“表单设计器”中，添加两个组合框，在第1个组合框Combo1“属性”的RowSourceType处输入“6-字段”，在RowSource处输入“币种1”，在第2个组合框Combo2“属性”的RowSourceType处输入“6-字段”，在RowSource处输入“币种2”。 6. 在“表单设计器”中，添加两个命令按钮，在第1个命令按钮“属性”的Caption处输入“查询”，在第2个命令按钮“属性”的Caption处输入“退出”。 7. 在“表单设计器”中，双击“Command2”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”，接着关闭编辑窗口。 8. 在“表单设计器”中，双击“Command1”命令按钮，在“Command1.Click”编辑窗口中输入下列语句，接着关闭编辑窗口。 if used("外汇代码") select 外汇代码 else use 外汇代码 endif locate for 外币名称=thisform.Combo1.value mm1=外币代码 locate for 外币名称=thisform.Combo2.value mm2=外币代码 select * from rate where 币种1代码=mm1 and 币种2代码=mm2 into table tmp_rate