一、
一、命令方式：启动Visual Foxpro系统后，在命令窗口中输入
CREATE DATABASE 外汇管理 保留字可以取前四个字母
不出现“数据库设计器”对话框
二、可以使用菜单方式进行建立
1. 单击“文件\新建”命令项，弹出“新建”对话框。
2. 在“新建”对话框中，选择“数据库”单选钮，再按“新建文件”按钮，弹出“创建”
对话框。
3. 在“创建”对话框中输入数据库名“外汇管理”，再按回车键或按“保存”按钮，这样
就可以建立数据库了，并出现“数据库设计器”对话框。
可以有两种方法：一是命令方法，二是菜单方法。
命令方法：
OPEN DATABASE 外汇管理
ADD TABLE currency_sl
ADD TABLE rate_exchange
菜单方法：
1. 单击“文件\打开”命令项，选择“文件类型”为数据库，打开“外汇管理”并显示“
数据库设计器-外汇管理”的对话框。
2. 在对话框中单击鼠标右键，显示右击菜单，选择“添加表”命令，并选择相应的表文件
即可(currency_sl和rate_exchange)。
ALTER TABLE rate_exchange RENAME COLUMN 买出价 TO 现钞卖出价
1. 打开并修改数据库
MODIFY DATABASE 外汇管理
2. 在“数据库设计器-外汇管理”的对话框中，选择表“rate_exchange”并单击鼠标右键
，选择“修改”命令，接着显示“表设计器-rate_exchange.dbf”，单击“索引”选项卡，然
后输入索引名“外币代码”，选择类型为“主索引”，表达式为“外币代码”，最后单击“确
定”按钮。
3. 在“数据库设计器-外汇管理”中，选择表“currency_sl”并单击鼠标右键，选择“修
改”命令，在屏幕上显示“表设计器-currency_sl.dbf”窗口，单击“索引”选项卡，然后输
入索引名“外币代码”，选择类型为“普通索引”，表达式为“外币代码”，最后单击“确定
”按钮。
4. 在“数据库设计器-外汇管理”中，选择“rate_exchange”表中主索引键“外币代码”
并按住不放，然后移动鼠标拖到“currency_sl”表中的索引键为“外币代码”处，松开鼠标即
可。
二、
1. 打开并修改数据库
MODIFY DATABASE 外汇管理
2. 单击“文件\新建”菜单项，在“新建”对话框中选择“视图”单选钮，再单击“新建
文件”。在“添加表或视图”对话框中，双击表“Rate_exchange”(或单击选中表
“Rate_exchange”，接着单击“添加”按钮)，再双击表“Currency_sl”，单击“关闭”按
钮，来关闭“添加表或视图”对话框。
3. 单击“字段”选项卡，选择试题要求的字段添加到“选定字段”列表框中，再在“函数
和表达式”中输入“Rate_exchange.基准价* Currency_sl.持有数量”，再单击“添加”按钮。
4. 单击“排序依据”选项卡，选择“Rate_exchange.基准价* Currency_sl.持有数量”并
选择“降序”，接着单击“添加”按钮。
5. 保存该视图，在“保存”对话框中输入视图名“view_rate”。
SELECT 姓名,SUM(exp_4) AS 人民币价值;
FROM view_rate GROUP BY 姓名;
ORDER BY 2 DESC INTO DBF results
三、
1. 在命令窗口中输入建立表单命令
CREATE FORM 外汇浏览
2. 在“表单设计器”中，在“属性”的Caption处输入“外汇查询”。
3. 在“表单设计器”中，添加一个标签，在“属性”的Caption处输入“输入姓名”。
4. 在“表单设计器”中，添加一个文本框Text1。
5. 在“表单设计器”中，添加一个表格控件，在“属性”的RecordSourceType处选择“4
- SQL 说明”。
6. 在“表单设计器”中，添加两个命令按钮，在第1个命令按钮“属性”窗口的Caption处
输入“查询”，在第2个命令按钮“属性”窗口的Caption处输入“退出”。
7. 双击“查询”按钮，在“Command1.Click”编辑窗口中编写相应的程序
OPEN DATABASE 外汇管理
name1=thisform.text1.value
thisform.grid1.RecordSource="select 外币名称,持有数量 from view_rate where
姓名= '" + thisform.text1.value +"' order by 持有数量"
select 外币名称,持有数量 from view_rate where 姓名= name1 order by 持有数量 into
dbf &name1
8. 双击“退出”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”
，并关闭编辑窗口。