vf中的程序是什么意思如下

发布网友 发布时间：2023-05-04 18:54

我来回答

共3个回答

热心网友 时间：2023-11-04 00:57

close all 关闭vf中的全部
set safety off　关闭安全提示：覆盖、删除、清空等操作时不再提示
use four 打开名为four 的表
copy to bak1 复制表four到表bak1 中
use bak1 打开表bak1
do while not eof() 循环开始，循环条件为不到文件尾
ksh=考生号 把bak1中考生号的字段值付值给ksh
select 成绩 from kscjb where 考生号=ksh and 考试科目="101" into array arr
查询表kscjb（考试成绩表）中考生号=ksh 并且 考试科目="101" 的成绩并赋值给数组arr
repl *成绩 with arr(1)
用arr（1）的值替换bak1表中的*成绩字段，因为没有范围只替换当前记录。下面就几句都相同了只不过是科目不同
select 成绩 from kscjb where 考生号 = ksh and 考试科目="102" into array arr
repl 外语成绩 with arr(1)
select 成绩 from kscjb where 考生号=ksh and 考试科目 ="103" into array arr
repl 高数成绩 with arr（1）
select 成绩 from kscjb where 考生号=ksh and 考试科目="104" into array arr
repl 专业课成绩 with arr（1）
skip bak1中的记录下移一条
enddo 循环结束
repl all 总成绩 with *成绩+外语成绩+高数成绩+专业课成绩
表bak1中用 *成绩+外语成绩+高数成绩+专业课成绩 替换 总成绩 因为范围为all所以是全部记录，也就是求所的人的总成绩
close all 关闭全部
select * from bak1 where 总成绩>=330 into table four order by 总成绩 desc
把表bak1中的 总成绩>=330的记录添加到表four中，并按总成绩从高到低排列。
set safety on 打开安全提示

热心网友 时间：2023-11-04 00:57

你可以看一下有关sql那部分的课本，上面都有的，你要是自学的话其实还是有难度的，可以报个班，我就是报了班上了课才考过的。祝你成功

热心网友 时间：2023-11-04 00:58

呵呵，SQL语言。追问能翻译一下么？