vfp机考
- 格式：doc
- 大小：36.00 KB
- 文档页数：4
医保卷：
(1)在D盘KS文件夹中有文件：求和.SCX。
要求该表单运行时在两个输入框中输入数字后，点击“执行计算”按钮，则计算出两数的和。
单击“清零”按钮时两个输入框归零，而且和数也清空。
注：请打开该文件对“执行计算”命令按钮、“清零”命令按钮的Click事件的过程中所指定的行，填充合适的内容。
填充完毕后运行表单，检查效果，符合要求后交卷。
(提示:请启动VFP并在命令窗口中输入SET DEFA TO D:\KS ,然后再操作!)
答案：**** 操作者要将???? 所在处的问号去掉后，在原问号所在处按题目要求填充合适的内容！！
BL1=THISFORM.TEXT1.value &&&&&&在???? 处输入合适的内容[_T_0]
BL2=THISFORM.text2.V ALUE &&&&&&在???? 处输入合适的内容[_T_1] BEL5.caption=ALLT(STR(BL1+BL2,10)) &&&&&&在???? 处输入合适的内容[_T_2]
*********************
**** 操作者要将???? 所在处的问号去掉后，在原问号所在处按题目要求填充合适的内容！！
**** 完成本题，不得增加命令行，所给的命令行中的字符，除???? 符号外其它字符不许删除！
*******要补充的内容与指定补充的说明字符要在同一行,否则判为出错.
（2）大家抱歉啊，第二题手一快按提交了，没复制到。
不过答案还是有的。
如果你们看到题目是要打开一个文件名是“变与动”的表单的话，下面的是答案：
**** 操作者要将???? 所在处的问号去掉后，在原问号所在处按题目要求填充合适的内容！！
if t=0
thisform.shape1.curvature=0 &&&&&在???? 处输入合适的内容[_T_0]
t=1
else
thisform.shape1.curvature=90
t=0 &&&&&在???? 处输入合适的内容[_T_1]
endif
if thisform.shape1.left<thisform.width
thisform.shape1.left=thisform.shape1.left+50 &&&&&在???? 处输入合适的内容[_T_2] ELSE &&&&&在???? 处输入合适的内容[_T_3 thisform.shape1.left=0
endif
**** 操作者要将???? 所在处的问号去掉后，在原问号所在处按题目要求填充合适的内容！！
**** 完成本题，不得增加命令行，所给的命令行中的字符，除???? 符号外其它字符不许删除！
*******要补充的内容与指定补充的说明字符要在同一行,否则判为出错.
（3）从下面文本框中给出的语句中选出恰当语句并确定语句顺序，完成一个(1/1)+(1/2)+(1/3)+(1/4)+……+(1/100)并输出结果的正确程序。
(你应在VFP中建立一个程序文件作验证后再作选择!)
[组合选择题,要按顺序输入所选的答案!连同RETU在内,答案个数有7个,最后一个选RETU!] (A)RETU (B)N=N+S (C)stor 0 to n,s
(D)do while s<100 (E)do while N<101 (F)s=s+1
(G)n=n+(1/s) (H)n=n+[1/s] (I)enddo
(J)?n (K)N=N+1 (L)?S
答案：
stor 0 to n,s
do while s<100
s=s+1
n=n+(1/s)
enddo
?n
RETU
（4）在VFP中，表单是指（）。
(A)人机交互时的窗体界面
(B)数据库的查询结果的列表
(C)数据表中的各个记录的清单
(D)数据库中各数据表的清单
（5）在面向对象方法中，对象可看成是属性（数据）以及这些属性上的专用操作的封装体，封装是一种（）技术。
(A)组装(B)产品化(C)固体(D)信息隐藏
二院题：
从下面文本框中给出的语句中选出恰当语句并确定语句顺序，完成一个将1到100累加，并且将和数输出正确的程序。
正确顺序：7个语句
Stor 0 to n,s
Do while s<100
N=n+s+1
S=s+1
Enddo
?n
retu
有名为:CXBD.SCX的表单文件,要求该表单运行时随输入框中输入的姓名能同步在表格(Grid)控件中显示相应数据，当鼠标单击“退出”按钮时释放表单。
请完善该表单欠缺的命令。
注：在D盘KS文件夹中有文件：CXBD.SCX，请打开该文件对TEXT对象的InteractiveChange 事件和命令按钮对象的Click事件的过程中指定的行，补充合适的命令。
然后运行表单检查效果，符合要求后才交卷。
(提示:请启动VFP并在命令窗口中输入SET DEFA TO D:\KS ,然后再操作!)
BL1=ALLT(THISFORM.text1.value) &&&&&补充的内容要与此同一行,否则该题按零分计。
[_T_0]
SET FILT TO zgda.姓名=BL1
THISFORM.refresh &&&&&补充的内容要与此同一行,否则该题按零分计。
[_T_1]
*********************
THISFORM.release &&&&&& 将???? 所在处的问号去掉后,补充的适当内容。
[_T_2
(5)在D盘KS文件夹中有文件：ZFZH.SCX，要求该表单运行时随着在输入框中输入有阿拉伯数字串，同步在另一个文本框中输出对应的中文数字字符串(例如：输入203，输出贰零叁)，单击“重置”按钮时清空两个文本框的内容。
注：请打开该文件对TEXT1对象的InteractiveChange事件和“重置”命令按钮对象的Click 事件的过程中所指定的行，填充合适的内容。
填充完毕后运行表单，检查效果，符合要求后交卷。
(提示:请启动VFP并在命令窗口中输入SET DEFA TO D:\KS ,然后再操作!)
DXZF=[零壹贰叁肆伍陆柒捌玖]
zf=[]
zfcd=len(allt(thisform.text1.value)) &&&&&&±±&&在???? 处输入合适的内容[_T_0] for t=1 to ZFCD step 1 &&&&&&±±&&在???? 处输入合适的内容[_T_1] sz=val(subs(thisform.text1.value,t,1))
zf=zf+subs(DXZF,2*sz+1,2) &&&&±±&&&&在???? 处输入合适的内容[_T_2] ENDFOR
thisform.text2.value=zf &&&&&±±&&&在???? 处输入合适的内容[_T_3]
thisform.text1.value=[] &&&&&在???? 处输入合适的内容[_T_4] thisform.text2.value=[] &&&&&在???? 处输入合适的内容[_T_5] thisform.text1.setfocus
命令按钮是（ C ）。
(A)控件(B)容器(C)控件类对象(D)容器类对象
以下特点中不属于面向对象程序设计的特点的是（A ）。
(A)单一性(B)继承性(C)封装性(D)多态性。
