在VFP中怎样编写程序在学生表中进行查询，显示所有男生记录。（请尝试用多种方法实现程序）

楼上的就可以，这里加个：

list all for 性别='男'

或者

use 学生表

go top

do wihle not eof()

locate for 性别='男'

if found()

display

endif

skip

enddo

你的报表MY001FRX里的数据环境里是TABLE1是吧，所以总是显示TABLE1的内容。CURSOR TEMP表是代码临时产生的，在产生后你要把这个TEMP指定为报表的数据源。先要对报表进行排版设计，把你要显示的字段都添加到DETAIL栏里，然后对每个字段域里的EXPRESSION里输入表达式，如显示姓名则写入TEMP姓名（而不是TABLE1姓名）这样，报表预览时就会用TEMP的内容填充了

首先假定一年刚好365天

select 学号,姓名,性别,int((date()-出生日期)/365) as "年龄" from 王文庆 where 学号=alltrim(thisformtext1value) into table aa

或者

select 学号,姓名,性别,year(date())-year(出生日期) as "年龄" from 王文庆 where 学号=alltrim(thisformtext1value) into table aa

新建一个程序，写代码: accept "请输入要查询的学生的姓名:" to stu_name

close all

use stud

locate for 姓名=alltrim(stu_name)

if eof()

messagebox("查无此人!")

return

else

select from stud where 姓名=alltrim(stu_name)

endif

IF thisformtxtghVisible=f

thisformlblsrglhVisible=t

thisformtxtghVisible=t

thisformtxtghsetfocus

WAIT window "等待"

ELSE

WAIT window "正在查找!!" NOWAIT

SELECT ygxs &&员工信息表

LOCATE for ALLTRIM(员工编号)==ALLTRIM(thisformtxtgh value)

IF FOUND()

wait clear

thisformlblsrglhVisible=f

thisformtxtghVisible=f

thisformgrdLjxssetfocus

ELSE

WAIT window "没有找到"

thisformtxtghvalue=""

thisformtxtghsetfocus

endif

ENDIF

thisformRefresh

以上就是关于在VFP中怎样编写程序在学生表中进行查询，显示所有男生记录。（请尝试用多种方法实现程序）全部的内容，包括:在VFP中怎样编写程序在学生表中进行查询，显示所有男生记录。（请尝试用多种方法实现程序）、VFP中查询结果怎样输出到报表文件、在VFP中，用表单做一个查询程序，里面有个年龄的选项我不知道怎么做等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！