VFP表格编程问题（初级）

1）统计JSB1表中男女教师的人数。
（2）求出JSB1表中教师的最高工资，并输出该教师的姓名和工资。
GH XM XB XIMING CSRQ JBGZ
A0001 王一平 男 信息管理系 1960-09-04 2300
A0002 李刚 男 审计系 1962-0406 2400
C0001 程东萍 女 审计系 1950-05-06 3100
C0002 赵龙 男 会计系 1948-02-12 3800
B0001 张彬 男 金融系 1970-06-24 2000
D0001 方媛 女 数学系 1981-11-23 1500
答案：
1
use jsb1
store 0 to nan,nv
do while .not. eof()
if xb='男'
nan=nan+1
else
nv=nv+1
endif
skip
enddo
? '男='+str(nan,5)+' 女'+str(nv,5)

2
use jsb1
zggz=0
mxm=''
do while .not. eof()
if jbgz>zggz
zggz=jbgz
mxm=xm
endif
skip
enddo
? mxm+str(zggz,8,2)

(1)SELECT XB,COUNT(*) FROM JSB1 GROUP BY XB
(2)SELECT XM,JBGZ FROM JSB1 WHERE JBGZ IN (SELECT MAX(JBGZ) FROM JSB1)

loushang duile .