在vfp中表单的制作，求问“确定”按钮的click语句怎么写。灌水的就不要回答了谢谢。

do case

case myoption.value=1

select 姓名,成绩 where 性别=“男” from 表名 into table mytable1

case myoption.value=2

select 姓名,成绩 where 性别=“女” from 表名 into table mytable2

endcase

t1=alltrim(thisform.text1.value)

o1=thisform.optiongroup1.value

do case

case o1=1

sele * from 表名 where 姓名=t1 into cursor "temp"

thisform.grid1.recordsource="temp"

case o1=2

sele * from 表名 where 性别=t1 into cursor "temp"

thisform.grid1.recordsource="temp"

case o1=3

sele * from 表名 where 政治面貌=t1 into cursor "temp"

thisform.grid1.recordsource="temp"

endcase

---