UC知道急急急！VFP题目求高手速度解答谢谢
来源：百度知道 编辑：UC知道 时间：2024/07/04 11:06:44
填空题
1.程序功能：求“职工.dbf”数据表中的记录，并按从末记录到首记录的顺序逐条显示。
SET TALK OFF
CLEAR
USE 职工
_______&&记录指针定位到末尾
DO WHILE_______&&记录指针向上跳没超出表范围
DISP
______&&记录指针向上跳一条
ENDDO
______&&关闭当前表
SET TALK ON
2.在学生表（xsb.dbf）的第三条记录前插入一条记录。
命令为：_______
_______
3.当前记录号可用函数________求得，如果一个表中有8条记录，当EOF()为真时，则当前记录号为______
4.从键盘输入一串字符（口令），自动判断输入的口令是否与系统的口令（“MANAGER”）完全一致。完全一致则显示相应的欢迎信息，否则有三次机会，输入次数在三次以内，给予重输的提示，输入超过三次，则显示无权使用系统的提示。
SET TALK OFF
CLEAR
C=“”
FOR_____
ACCEPT C+“请输入口令”TO PSW
____
?"欢迎使用本系统！”
_______
ENDIF
C="口令输入错误，再试一次！”
ENDFOR
_____I＞3
？“对不起，你无权使用本系统。”
ENDIF
SET TALK ON
2.给任意一个年份（从键盘输入），判断它是否是闰年。（闰年的条件：能被4整除，但不能被100整除的年份或能被100整除但又不能被400整除的年份）
CLEAR
INPUT"请输入年份：TO Y
IF______
?Y,'是闰年'
______
?Y,'不是闰年'
endif
set talk on
3.求1+3+5=.........+99的值
1.程序功能：求“职工.dbf”数据表中的记录，并按从末记录到首记录的顺序逐条显示。
SET TALK OFF
CLEAR
USE 职工
_______&&记录指针定位到末尾
DO WHILE_______&&记录指针向上跳没超出表范围
DISP
______&&记录指针向上跳一条
ENDDO
______&&关闭当前表
SET TALK ON
2.在学生表（xsb.dbf）的第三条记录前插入一条记录。
命令为：_______
_______
3.当前记录号可用函数________求得，如果一个表中有8条记录，当EOF()为真时，则当前记录号为______
4.从键盘输入一串字符（口令），自动判断输入的口令是否与系统的口令（“MANAGER”）完全一致。完全一致则显示相应的欢迎信息，否则有三次机会，输入次数在三次以内，给予重输的提示，输入超过三次，则显示无权使用系统的提示。
SET TALK OFF
CLEAR
C=“”
FOR_____
ACCEPT C+“请输入口令”TO PSW
____
?"欢迎使用本系统！”
_______
ENDIF
C="口令输入错误，再试一次！”
ENDFOR
_____I＞3
？“对不起，你无权使用本系统。”
ENDIF
SET TALK ON
2.给任意一个年份（从键盘输入），判断它是否是闰年。（闰年的条件：能被4整除，但不能被100整除的年份或能被100整除但又不能被400整除的年份）
CLEAR
INPUT"请输入年份：TO Y
IF______
?Y,'是闰年'
______
?Y,'不是闰年'
endif
set talk on
3.求1+3+5=.........+99的值
一1、go bott 2、not bof() 3、skip -1 4、use
二1、go 3 2、INSER BEFORE BLANK
三1、recno() 2、9
四1、i=1 to 3 2、if PSW==“MANAGER” 3、exit 4、if
五1、y%4=0 and y%100<>0 2、else
六1、s=s+I 2、i=i+2
N年前搞过visual fox pro