代码放在表单的某命令按钮中的。该表单有文本框Text1和Text2，表格Grid1和Gird2，标签Label1-Label4等控件。多看书为好。

版主，利用你的代码，在朋友的指点下基本上做出了。但有几个问题。
实际试了，表格GRID只要一个就行了，还有Temp2.dbf,temp3.dbf 好像没有什么用，数据跟temp1.dbf的一样，temp3.dbf没有你所说的存放结果，分析出来的结果怎样才能取出来保存在.txt或excel文档里？

哇，果然不错，不知能否将你的源代码放出来？

还有，VFP里执行表单时提示“别名已被使用”是什么意思？怎样解决。听朋友说加一段代码可以解决这个问题，但他忘记了。

我在另外一个贴说了，你回答是 产生错误的地方，改“Use 表名”为“Select 表别名”，可是我不明的是你给的代码就是用了Select呀。

[此贴子已经被作者于2007-10-10 18:04:30编辑过]

数据及程序全在表单里面。

太感谢了！
现在才慢慢记起以前玩过VFP。玩起程序来挺有意思的。

我要好好学习下了。

版主，你给的源代码，我还是有个地方不明白，你的数据是如何录入的？我自己通过txt文档导入转为dbf文件录入数据后生成temp1.dbf，再分别复制改名得到tmep.dbf,,temp2.dbf,temp3.dbf,但执行表单后仍然只显示你程序里的数据，我用另外的数据无效。

版主,我知道你是怎样录入数据的了,
Create Cursor Temp (hm1 C(2),hm2 C(2),hm3 C(2),hm4 C(2),hm5 C(2),hm6 C(2))
Insert Into Temp Values ('01','02','03','04','05','06')
Insert Into Temp Values ('01','02','03','04','05','07')
Insert Into Temp Values ('01','02','03','04','05','07')
Insert Into Temp Values ('01','02','03','04','05','08')
Insert Into Temp Values ('01','02','03','04','05','08')
Insert Into Temp Values ('01','02','03','04','05','08')
Insert Into Temp Values ('01','02','03','04','06','09')
Insert Into Temp Values ('01','02','03','04','06','09')
Insert Into Temp Values ('01','02','03','04','06','09')
Insert Into Temp Values ('01','02','03','04','06','09')
ThisForm.Grid1.ColumnCount=-1
ThisForm.Grid1.RecordSource='Temp'

但实际我要分析的数据有时有几百万组,那不是晕?

最好能够实现用打开按钮，读入txt数据将数据写入grid1里。再将grid2的数据保存为txt文档.

[此贴子已经被作者于2007-10-11 11:06:30编辑过]

问题太多。我关注问题的核心是怎么计算，至于几百万组数据怎么来，我不管。你自己搞定。