在vf中如何条件查询?
答案:4 悬赏:10
解决时间 2021-01-24 17:25
- 提问者网友:送舟行
- 2021-01-24 06:51
在vf中如何条件查询?
最佳答案
- 二级知识专家网友:渡鹤影
- 2021-01-24 08:31
select 字段列表 from 成绩表 where 课程1<60 or 课程2<60 or 课程3<60 (...可以继续添加);
into table cx
use cx
brows
学生.dbf
成绩.dbf
select 学生.姓名,成绩.* from 成绩;
inner join alltrim(学生.学号)==alltrim(成绩.学号);
where 课程1<60 or 课程2<60 or 课程3<60 (...可以继续添加);
into table cx
cx这个表内就包含了姓名学号某门课程成绩不及格的记录
*.prg
use 成绩表
clear
accept "请输入课程名" to a
zd=""
lflage=.f.
i=1
do while i<=fcount()
if field(i)==alltrim(a)
zd=field(i)
exit
endif
if i=fcount()
messagebox("课程名不存在!","系统提示")
lflage=.t.
EXIT
endif
i=i+1
enddo
if not lflage
DISPLAY 姓名,&zd. for &zd.<60
endif
对应课程不及格学生和相应课程成绩查询
use 成绩表
go top
s=""
do while !eof()
for i=2 to fcount()&&第二个字段开始为成绩字段
s=field(i)
if i=2
?姓名字段
endif
if &s.<60
??s
endif
endfor
skip
enddo
大概是这样的
没有试过程序
into table cx
use cx
brows
学生.dbf
成绩.dbf
select 学生.姓名,成绩.* from 成绩;
inner join alltrim(学生.学号)==alltrim(成绩.学号);
where 课程1<60 or 课程2<60 or 课程3<60 (...可以继续添加);
into table cx
cx这个表内就包含了姓名学号某门课程成绩不及格的记录
*.prg
use 成绩表
clear
accept "请输入课程名" to a
zd=""
lflage=.f.
i=1
do while i<=fcount()
if field(i)==alltrim(a)
zd=field(i)
exit
endif
if i=fcount()
messagebox("课程名不存在!","系统提示")
lflage=.t.
EXIT
endif
i=i+1
enddo
if not lflage
DISPLAY 姓名,&zd. for &zd.<60
endif
对应课程不及格学生和相应课程成绩查询
use 成绩表
go top
s=""
do while !eof()
for i=2 to fcount()&&第二个字段开始为成绩字段
s=field(i)
if i=2
?姓名字段
endif
if &s.<60
??s
endif
endfor
skip
enddo
大概是这样的
没有试过程序
全部回答
- 1楼网友:笑迎怀羞
- 2021-01-24 10:28
用条件语句,用list也行,FOR "字符段"值等于"条件"
- 2楼网友:夜风逐马
- 2021-01-24 09:37
sqlserver的方法用Where条件判断 少于60的
- 3楼网友:话散在刀尖上
- 2021-01-24 08:53
关键需要把表结构给出来啊
如果表是这样的
姓名 学科 分数
那select * from 表 where 分数<60
就行,当然用VF自带那个list也行
如果表是这样的
姓名 学科 分数
那select * from 表 where 分数<60
就行,当然用VF自带那个list也行
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯