三、

　　1. 打开并修改表单

　　MODIFY FORM zonghe

　　2. 双击“添加>”按钮，在“Command1.Click”编辑窗口中进行修改。

　　thisform.list2.additem(thisform.list1.value)

　　3. 双击“<移去”按钮，在“Command2.Click”编辑窗口中进行修改。

　　thisform.list2.removeitem(thisform.list2.listindex)

　　4. 双击“确定”按钮，在“Command3.Click”编辑窗口中进行修改。

　　cn=""

　　cc=thisform.list2.ListCount

　　FOR i=1 TO cc

　　x=allt(thisform.list2.listitem(i))

　　cn=cn+"课程名称='"+x+"'"+" or "

　　ENDFOR

　　cn=substr(cn,1,len(cn)-4)

　　*****上面的程序在Command3.Click中已有，考生只要添加下面的语句

　　select 姓名,课程名称,考试成绩 from student;

　　join course join score ;

　　on course.课程编号=score.课程编号;

　　on student.学号=score.学号 where &cn ;

　　order by 课程名称,考试成绩 desc into table zonghe