现有表1

学号   科目    第一次月考成绩     期中成绩     第三次月考成绩     期末成绩   
111    语文        90               87             89                98
111    数学        89               80             78                88
111    英语        90               87             89                67
222    语文        90               87             98                88
222    数学        85               80             89                98
222    英语        80               89             87                78

表2
学号   科目      期中成绩     期末成绩

现在通过表单选择，点击交换按钮，将表1中的1条记录的“学号”“科目”“期中成绩”“ 期末成绩”复制到表二

表单如图示，其中  学号：Text1   科目：Combo1  （内有语文、数学、英语），交换： Command1
请问交换按钮的click代码怎么编写，谢谢了!

Command1.Click(表1中 学号、科目 字段为字符型)
Insert Into 表2 Select 学号,科目,期中成绩,期末成绩 From 表1 Where AllTrim(学号)==AllTrim(ThisForm.Text1.Value) And AllTrim(科目)==AllTrim()

vfp6 ？还是9？

如果是VFP6版本
Append From 命令
如果还不会写代码，认真研究一下这个命令的用法。

[ 本帖最后由 sdta 于 2014-4-17 14:05 编辑 ]

VF9.0啊

非常感谢，问题已经解决了