VFP.... 最好可以有详细的过程，，谢谢。。。

1.
首先创建数据库VFKS-A.DBC，然后创建那两个表。SX.DBF里把零件编号设置为主索引（PRIMARY），单价设置为普通索引（REGULAR）；YT.DBF里把零件编号设置为主索引。在设计窗口的数据库窗口中两个表操作建立永久关系：鼠标左键按住SX.DBF字段列表最下方索引里的索引字段零件编号拖至YT.DBF字段列表最下的索引字段里的零件编号，然后释放鼠标。这是会出现一条黑线，表示两个表的永久关系已经建立。
2.
创建程序VFKS-A.PRG，其中代码如下：
**考生姓名：XXX**
**学号：100001**

**2.(1)**
OPEN DATABASE vfks-a.DBC
USE sx ALIAS sx IN 0
USE yt ALIAS yt IN 0
SELECT sx
SET ORDER TO 单价 DESCENDING
GO TOP
FOR I=1 TO 2
?零件编号,零件名,yt.用途
SKIP
ENDFOR

**2.(2)**
SELECT sx.零件编号,(sx.单价*yt.数量) AS 合计,yt.用途 FROM sx;
INNER JOIN yt;
ON sx.零件编号=yt.零件编号;
ORDER BY yt.用途;
INTO CURSOR LINSHI
SELECT LINSHI
LIST
CALCULATE SUM(合计) TO ZJ
CLOSE TABLES ALL
CLOSE DATABASES

3.
1.)表单的CAPTION属性设置为学号及姓名；表单中添入4个LABEL,2个BUTTON，2个TEXTBOX;
2.)表单的INIT事件里写上：THISFORM.LABEL4.VISIBLE=.F.；两个TEXTBOX的INIT事件里写上：THIS.VALUE=0 **只能输入整数的设定**
3.）在BUTTON1中写上代码：
IF THISFORM.TEXT1.Value<100 OR THISFORM.TEXT1.VALUE>200
=MESSAGEBOX("请在TEXT1中输入100-200之间的自然数！",0+64,"提示")
THISFORM.TEXT1.SetFocus
ELSE
N=THISFORM.TEXT1.Value
HE=0
GESHU=0
FOR I=3 TO N
IF I%3=0
HE=HE+I
GESHU=GESHU+1
ENDIF
ENDFOR
THISFORM.TEXT2.Value=HE
THISFORM.LABEL1.Caption="共有"+ALLTRIM(STR(GESHU))+"个数能被3整除！"
THISFORM.LABEL1.Visible=.T.
ENDIF
THISFORM.Refresh
4.）在BUTTON2里写上代码：THISFORM.RELEASE