Question

VFP表单问题

题目已经把那个表格放到组合框中了，只需要组合框的代码就可以了...

Answer 1

** interActivateChange &&事件代码 combo1.interActivateChange
select count(*) as cnt from grade into array cntArray where 成绩>=85
thisform.text1.value = cntArray[1]
select count(*) as cnt from grade into array cntArray where between(成绩,60.84)
thisform.text2.value = cntArray[1]
select count(*) as cnt from grade into array cntArray where 成绩<60
thisform.text3.value = cntArray[1]