揚州大學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 )卷的答案有沒有
直接去老師那拿就行了。一般每年都差不多。