set talk off USE student.dbfindex on 考号 to ikhaccept"输入考号:"to khseek kh if .not.found()"无此考号"elsedo casecase 成绩>=85pj="优秀"case 成绩>=75pj="良好"case 成绩>=60pj="不及格"otherwisepj="不及格"endcase"考号"+KH+姓

来源：学生作业帮助网编辑：六六作业网时间：2024/12/23 19:55:42

settalkoffUSEstudent.dbfindexon考号toikhaccept"输入考号:"tokhseekkhif.not.found()"无此考号"elsedocasecase成绩>=8

set talk off USE student.dbfindex on 考号 to ikhaccept"输入考号:"to khseek kh if .not.found()"无此考号"elsedo casecase 成绩>=85pj="优秀"case 成绩>=75pj="良好"case 成绩>=60pj="不及格"otherwisepj="不及格"endcase"考号"+KH+姓
set talk off
USE student.dbf
index on 考号 to ikh
accept"输入考号:"to kh
seek kh
if .not.found()
"无此考号"
else
do case
case 成绩>=85
pj="优秀"
case 成绩>=75
pj="良好"
case 成绩>=60
pj="不及格"
otherwise
pj="不及格"
endcase
"考号"+KH+姓名+"评价"+pj
endif
use
return

set talk off USE student.dbfindex on 考号 to ikhaccept"输入考号:"to khseek kh if .not.found()"无此考号"elsedo casecase 成绩>=85pj="优秀"case 成绩>=75pj="良好"case 成绩>=60pj="不及格"otherwisepj="不及格"endcase"考号"+KH+姓
这是老早的数据库编程语言foxbase/forxpro的一个简单程序.下面按照各行来解释
打开student.dbf数据库
建立以考号为索引值的kh
自定义输入考号:到KH
查对索引值kh
如果找不到和以考号为索引的kh值相同的输入考号
则输出"无此考号"
否则
从下面几项中做选择
如果输入的考号的成绩>=85
则把PJ赋予字符串"优秀"
下面意思同理
最后根据情况,输出输入的"考号"和姓名及评价.(pj其实就是评价内容,如不及格等)
最后ENDIF结束IF的判断语句,
USE 是关闭原先打开的student.dbf数据库
返回结果

请问Vf 中的 set talk on/off SET TALK OFF,X=2 ,DO WHILE X VF中,程序开头的SET TALK OFF 　　　　　　　　CLEAR SET TALK OFF 这个语句有什么作用? vfp中set talk off/on和set safety 程序中常用这两句开头和结尾~ set out,set up,set off,set set out,set up,set off,set 帮忙解释一下 SET SYSMENU TO _MSM_SYSTM,_MSM_PROG,_MSM_WINDOPUBLIC mtalkstat,mstatus,mclockstat,color1,color2**检查、设置、保存当前对话状态IF SET(talk)=on SET TALK OFF mtalkstat=onELSE mtalkstat=offENDIFmstatus=offmclocks SET TALK OFF STORE 1 TO A,B DO WHILE A 在vf数据库里,b->或a->是什么意思?recno()的用法?set talk off是什么用法? set talk off和set talk on如何使用提问：我是处在vfp的入门阶段,对set talk命令很是疑惑如果使用set talk on便打开了与vfp的交互环境,给变量赋值时,其值会显示在屏幕上如果使用set talk off将关闭人 set talk off clear s=o i=1 最好带中文的 set talk offclears=oi=1do while i set off的过去式 set off啥意思? set off的意思 set off 是什么意思啊? set off什么意思? set...off 什么意思?