文件1.txt

一个简单的学生管理系统

sele 学号,姓名,性别,出生日期,学生来源 from 学生表 where &x1. and &x2. and &x3. and &x4. and &x5. into array num
if num<>0
thisform.label1.visible=.t.
thisform.label1.caption="共"+ alltrim(str(num))+"人"



else 
thisform.label1.visible=.f.
messagebox("没有符合条件的记录",48,"结果")
endif

thisform.label1.visible=.f.
store "" to thisform.text1.value 
store "" to thisform.text2.value
store "" to thisform.text3.value
store "" to thisform.text4.value
store "" to thisform.text5.value
thisform.grid1.recordsourcetype=4
thisform.grid1.recordsource="sele * from 学生 into curs tmp2"