VFP 程序
设计
领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计
表单设计 例
题
快递公司问题件快递公司问题件货款处理关于圆的周长面积重点题型关于解方程组的题及答案关于南海问题
查询并显示指定班级的男女生人数
要求:(1)编制一个表单,实现在“学生”表中统计班级的男、女生人数的功能。(2)程序运行后,在text1中输入班级代号,如果学生表中没有该班级的学生,则消息框提示“该班级不存在”。(3)如果学生表中有该班级的同学,则统计该班级的男、女生人数,并分别显示在text2和text3中。(4) text2和text3只读。(要求用代码实现)。
数据环境 “学生”表
事件 代码
FORM1 的INIT事件 SET TALK OFF
THISFORM.TEXT2.READONLY=.T.
THISFORM.TEXT3.READONLY=.T. COMMAND1的N=ALLTRIM(THISFORM.TEXT1.VALUE) CLICK事件 LOCATE FOR LEFT(学号,3)==N
IF EOF()
THISFORM.TEXT2.VALUE=""
THISFORM.TEXT3.VALUE=""
MESSAGEBOX("该班级代号不存在")
ELSE
COUNT TO K FOR LEFT(学号,3)==N AND
性别
COUNT TO L FOR LEFT(学号,3)==N AND !
性别
THISFORM.TEXT2.VALUE=K
THISFORM.TEXT3.VALUE=L
ENDIF
COMMAND2的SET TALK ON
CLICK事件 THISFORM.RELEASE