扬州大学vfp第四版答案
㈠ 求VFP程序设计题答案(流程图!)
CLEAR
b=0
FOR n=11 TO 999
a=0
FOR t=1 TO n
a=a+t
IF a=n
b=b+n
a=0
EXIT
ENDIF
ENDFOR
ENDFOR
?b
RETURN
㈡ 在线等答案啊,关于vfp的问题
1.if CJ <60 ?"不合格"else if CJ >= 90 ?"优秀" else ?"合格" endifendif
2.a=3 b=12
3. to filename to array arrayname
4. 1)select * from stud where 姓名 like '张%' 2)select 学号,姓名,班级,成绩 from stud where 成绩 between 500 and 600 3)select * from teacher where 系别='计算机' 4)insert into stud values ("6198101","张峰","61981",560,"61981f") 5)select 教师名,工资 from teacher order by 工资 desc
㈢ 超绕的vfp程序题,求真相,答案是21 a(8)=4/a(5)=7/a(2)=10 谢谢!
首先给数组赋值,
然后把数组从大到小排列,
最后求出a(8)+a(5)+a(2)的值:
a(8)+a(5)+a(2)=4+7+10=21

㈣ 跪求VFP高手进来解答
1.“SCAN ... ENDSCAN”命令是当前表中顺序移动记录指针,并对满足指定条件的每条记录执行“SCAN”与“ENDSCAN”之间的命令块。不打开表,自然就谈不上在 表中移动记录指针,并对记录执行命令了。 答案选择B是对的,但题目本身不严谨,因为:在VF,数据库与表是两个概念,表可以是属于某个数据库的“数据库表”,也可以是不属于任何数据库的“自由表”;执行“SCAN ... ENDSCAN”必须打开的是“表”,而不是“数据库”,例如,根本就不建立数据库,仅对一个当前打开的自由表也可以执行“SCAN ... ENDSCAN”。这个题目混淆了VF的“数据库”与“表”,应当改为“必须打开某一个表”。“书上的例子没有打开”可能是省略了USE 命令,但在解释命令时一定有“当前表”之类的限定。总之,只能对当前工作区打开的表执行“SCAN ... ENDSCAN”
2.“&”是执行宏替换的命令,它把内存变量和数组元素的内容作原字符串使用,它后面紧接的变量确实只能是字符型,但该变量在执行宏替换时,可以根据给该变量赋值时的书写格式,作为VF支持的各种数据类型使用。例如:执行已知X="134"后,&X 就是 134,&X+478 就是 134+478,两者结果完全一样(此时,虽然 X 本身是字符型变量,它的值是"134",但在执行 &X+478 时,用数值 134 取代 &X,即实际执行的是 134+478,结果是 612;如果写成 X="'134'" 或 X='"134"',则在执行 &X +478 时,用字符串 "134" 取代 &X,即实际执行的是 "134"+478,将发生“操作数类型不匹配”错误,得不到结果;要得到"134478"的结果,两条语句应该是先执行 X="'134'" ,再执行 &X +"478")
X 赋值格式 &X 的数据类型 &X 的等效表达
X="134" 数值型 134
X="'134'" 字符型 '134'
X="{^1999-11-25}" 日期型 {^1999-11-25}
X=".T." 逻辑型 .T.
……
㈤ 急求VFP程序题目答案~
1、Select 编号、部门、姓名、工作时间、职称、实发工资 From XX Where 性别 = '女'
2、
3、Index ON 工作时间 Tag Gz Desc
4、Update XX Set 实发工资 = 实发工资 + 50 Where 性别 = '男'
5、Select * From xx Where 职称 = '副教授'
6、Select * From xx Into Table FB
7、Count For 职称 = '工程师' OR 职称 = '讲师' To Rs
8、Select 部门,Sum(实发工资) AS 工资总额 From xx Group By 部门 Into Table GZHZ
9、Display Record 4 off
10、GOTO 2
Display Fields 编号,部门,姓名,性别 Next 4
11、COPY STRUCTURE EXTENDED TO JG
12、Select 编号,姓名,实发工资 FROM XX Where 在编否 = .T.
13、Copy ALL TO BB.TXT TYPE SDF
㈥ vfp 阅读程序,给出运行结果,答案235,想要解释过程
你的这个答案是532(你的程序第4行错误,不能得到532),要得到235的程序如下:
CLEAR
cstr=[157]
c=VAL(cstr)
oc=dtoo(c)
?oc
RETURN
FUNCTIONdtoo
PARAMETERSs
LOCALa
a=ALLTRIM(STR(s%8))
c=INT(s/8)
IFc>=1
a=dtoo(c)+a
ENDIF
RETURNa
㈦ 哪位帅哥美女帮我解决VFP问题,答案我有,我要分析过程
STORE 1 TO PAR1,PAR2
STORE 5 TO K
*** 分别给PAR1,PAR2,K赋值分别为1,1,5
DO PROC1 WITH PAR1,PAR2,K
*** 调用过程PROC1,传递参数为PAR1,PAR2,K
?PAR1,PAR2
*** 显示 PAR1,PAR2 :5,30
PROCCEDURE PROC1
****过程PROC1
PARAMETERS P1,P2,P3
***接收参数,P1,P2,P3(值为1,1,5)
FOR I=1 TO P3
*** 循环从1到5
P1=P1*I
*** P1=P1*I,5次的值为:1,2,3,4,5
P2=P2+I*I
*** P2=P2+I*I 5次的值为:2,6,12,20,30 即:
*** 1+1,2+2*2,3+3*3,4+4*4,5+5*5
NEXT
*** 循环结束
ENDFUNC
㈧ VFP 的编程题目 计算三角形面积 笔试的用的。 (在线等答案)
1.
clear
input "请输入三角形的底长:" to a
input "请输入三角形的高长:" to h
s=a*h/2
?"此三角形面积是:",s
cancel
2.
clear
input "x=" to x
if mod(x,2)=0
?"X是偶数"
else
?"X是奇数"
endif
cancel
㈨ VFP问题,急求答案~~~~
1.
clear
select1
usegdzc
select2
usezjb
dowhile!eof()
v1=机器代码
v3=月工作量
v4=0&&月折旧
v2=substr(v1,1,1)
select1
locatefor机器代码=v1
ifv2=="1"
&&工作量法
v4=(原值-净残值)/总工作量*v3
else
if v2=="2"
&&直线法
v4=(原值-净残值)/预计年限/12
endif
endif
select2
replace月折旧额withv4
skip
enddo
?"月折旧计算完成"
?"打印折旧"
select1
list
select2
list
use
closeall
2.
clear
select1
usezjb
indexon机器代码toindex_1
select2
usegdzc
setrelatto机器代码intoa
accept"是否要新增固定资产数据:Y=是/其他=否>>"toflag1
v1=0
v2=0
v3=0
v4=0
v5=0
v6=0
v7=0
dowhileflag1=='Y'orflag1=='y'
accept"请输入机器代码>>"tov1
accept"请输入机器名称>>"tov2
input"请输入原值>>"tov3
input"请输入净残值>>"tov4
input"请输入预计年限>>"tov5
input"请输入总工作量>>"tov6
input"请输入月工作量>>"tov7
locatefor机器代码=v1
if !eof()
?v1
??"机器代码已存在"
accept"是否要新增固定资产数据:Y=是/其他=否>>"toflag1
else
select2
appendblank
replace机器代码withv1,机器名称withv2,原值withv3,净残值withv4,预计年限withv5,总工作量withv6
select1
appendblank
replace机器代码withv1,月工作量withv7
accept"是否要新增固定资产数据:Y=是/其他=否>>"toflag1
endif
enddo
ifflag1=='Y'orflag1=='y'
else
?
?"数据列表打印"
select2
list
select1
list
?"程序退出"
endif
use
closeall
删除数据
clear
select1
usegdzc
dowhile!eof()
delete
skip
enddo
pack
?"GDZC表数据删除成功"
select2
usezjb
dowhile!eof()
delete
skip
enddo
pack
?"ZJB表数据删除成功"
use
closeall
㈩ 2006年扬州大学VFP语言及程序设计( B )卷的答案有没有
直接去老师那拿就行了。一般每年都差不多。
