Vfp(下)选择题.doc

一、程序选择填空题 1．下面程序实现口令判断，当第三次输入出错时退出表单。 表单Form1的Init事件代码： （1） a=0 use 学生 this.text1.value=”” this.text1.passwordchar=”*” this.label1.visible=.f. （2） 文本框Text1的Valid事件代码： （3） if found() thisform.label1.caption=’口令正确！’ thisform.label1.visible=.t. retu .t. else （4） thisform.label1.caption=’已经三次错误！’ thisform.label1.visible=.t. thisform.release else thisform.label1.caption=’口令有错，重新输入！’ thisform.label1.visible=.t. a=a+1 retu .f. endif endif 【供选择的答案】 （1） a、public a b、local a c、para a d、可以省略 （2） a、this.text1.setfocus=.f. b、this.text1.setfocus c、this.text1.setfocus=.t. d、thisform.text.setfocus （3） a、seek thisform.text1.value b、seek for 姓名==allt(thisform.text1.value) c、loca for 姓名==allt(thisform.text1.value) d、loca all 姓名=allt(thisform.text1.value) （4） a、if a=3 b、if a=2 c、if a3 d、if a=3 2．下面程序实现一只小球在表单的高度范围（顶部与底部）内作动态的上下滚动。 表单Form1的Init事件代码：（已经新建了表单属性B） this.b=0 erval=100 （1） thisform.shape1.curvature=99 thisform.shape1.height=30 thisform.shape1.width=30 计时器timer1的timer事件代码： （2） thisform.b=1 endif if thisform.shape1.top=0 thisform.b=0 endif （3） thisform.shape1.top=thisform.shape1.top+1 else thisform.shape1.top=thisform.shape1.top-1 endif 【供选择的答案】 （1） a、this.timer1.show=.t. b、this.timer1.show=.f. c、this.timer1.enabled=.t. d、this.timer1.enabled=.f. （2） a、if thisform.shape1.top=thisform.height-30 b、if thisform.shape1.top=thisform.height-40 c、if thisform.shape1.bottom=thisform.height-30 d、if thisform.shape1.bottom=0 （3） a、if this.b=0 b、if this.b=1 c、if thisform.b=0 d、if thisform.b=1 3．下面程序实现形状（shape1）从圆形逐步变成正方形，又从正方形逐步变成圆形的过程。初始形状为红色底色的圆形，已新建a属性。 表单Form1的Init事件代码： this.a=1 （1） erval=1000 （2） .width=100 .height=100 （3） endwith 计时器Timer1的Timer事件代码：