搜索
第六章一、填空共64题（共计64分）利用ShowWindows属性和Desktop属性,可以将表单设置为【顶层表单】、浮动表单或子表单.如图所示的表单用于浏览教师(JS)信息.为了在表格控件中以不同的背景色显示男、女教师的信息,则在表格控件的Init事件代码中,可使用如下形式的语句:This.【Setall】(DynamicBackcolor,IIF(xb='女',RGB(125,125,125),;RGB(125,125,125)),Column)表单中下拉列表框的RowSourceType属性为6-字段,数据源为系名代码表(表的文件名为xmdm.dbf,含系代码(xdm)和系名(xim)两个字段),为了使下拉列表中显示系代码和系名两列数据,则RowSource属性值为:xmdm.xdm,【xim】.标签控件是用以显示文本的图形控件.标签控件的主要属性有:Caption属性,BackStle属性,AutoSize属性以及WordWrap属性等.其中WordWrap属性的功能是【自动换行】.设Labell是某表单上的一个标签控件,则利用Labell控件显示系统日期和时间,可以在该表单的Init事件代码中使用语句THISFORM.【Label1.Caption】=TTOC(DATETIME())来实现.某表单Form1上有一个命令按钮组Cmg,其中有两个命令按钮(分别为Cmd1和Cmd2),要在Cmd1的Click事件代码中设置Cmd2不可用,其代码为【THIS.parent.Cmd2.ENABLED=.F.】.学生注册表单(forml)如图所示,该表单中含有3个标签、2个文本框(Text1和Text2),1个命令按钮组(包含3个按钮),其功能是对学生信息进行注册:1)如在学生注册(ZC)表中已存在某学生的记录(学号已经存在),说明该学生已注册过;若没有,则进行注册,即将该学生信息存入学生注册表;2)进行注册时(即按确认按钮时),学生和姓名不能为空.表单是一个容器型控件,其集合属性为Controls,计数属性为ControlCount.此表单的ControlCount属性值为【6】.根据表单的功能要求,完善下列命令按钮组的Click事件代码:ch1=ALLT(THISFORM.Text1.Value)ch2=ALLT(THISFORM.Text2.Value)DOCASECASETHIS.Value=1IFLEN(ch1)=0ORLEN(ch2)=0=MESSAGEBOX(学号、姓名必须填写!)ELSE【Loca】forzc.xh=ch1IF!EOF()=MESSAGEBOX(此学生已注册,请重新输入!)ElseINSERTINTOzc(xh,xm)Values(ch1,ch2)ENDIFENDIFCASETHIS.Value=2THISFORM.Text1.Value=THISFORM.Text2.Value=【Thisform.Text1.setfocus】&&使Text1文本框得到输入焦点CASETHIS.Value=3THISFORM.RELEASEENDCASE对于组合框控件来说,要在组合框失去焦点前检验其值的有效性,可以在【valid】事件代码中写入相应的有效性检验代码.某表单上有一个表格控件,其列数为7,若要使其第3—7列的标头(Header)的标题依次显示为:成绩1,成绩2,成绩3,成绩4,成绩5,则可在表格的Init事件处理代码中包含下列程序段:ForI=3To7This.【Columns(i)】.Header1.Caption=成绩+【STR(i-2,1)】EndFor引用当前表单的关键字是【thisform】发设某表单Form1中有一表格控件Grid1,如果要将该表格控件中所有列对象中的BackColor属性设置为红色,可以使用下列命令:ThisForm.Grid1.【SETA】('BackColor',RGB(255,0,0),'Column')将文本框对象的【Readonly】属性设置为真,表单运行时,该文本框可以获得焦点,但文本框中显示的内容为只读.设某表单的背景色为浅蓝色,该表单上某标签的背景色为黄色,当该标签的Backstyle属性值设置为0(透明),运行该表单时该标签对象显示的背景色为【浅蓝色】.独立的、无模式的、【无父】表单称为顶层表单.在表单中,一个OLE绑定型控件利用表中的【通用】型字段显示一个OLE对象.对于如图所示的表单,当表单运行时,利用微调框(Spinnerl)Curvature来调节形状控件(Shapel)的Curvature属性,使形状控件的角的曲率发生变化.根据Curvature属性的取值范围的限定,微调框(Spinner1)的SpinnerLowValue属性值和SpinnerHighvalue属性值应该分别为0和【99】.当形状控件(Shape1)为椭圆时,微调框(Spinner1)的Value值应为【99】.设某命令按钮的标题显示为确定(Y)(注Y上有下划线),即该按钮访问键位Alt+Y,则其Caption属性值应设置为【确定(\Y)】.设某表单(Form1)上有一个文本框(Text1)和一个命令按钮(Command1).该表单运行时,单击命令按钮Command1,则文本框Text1中显示该表单数据环境的Name属性值.由此,命令按钮Command1的Click事件程序代码中必须写入的命令为:ThisForm.【TEXT1.VALUE】=ThisForm.DataEnvironent.Name若某表单上包含一个页框控件,页框上包含的页面数是未知的(或者说是动态变化的),则在刷新表单时为了刷新页框中的所有页面,可在页框的Refresh方法中包含如下的代码:ForI=1Tothis.【PageCount】This.Pages[i].RefreshEndFor文本框控件的【PasswordChar】属性设置为*时,用户键入的字符在文本框内显示为*,但Value属性中仍保存键入的字符串.在事件代码中相对引用当前表单集的关键字是【Thisformset】.Grid、Text、CommandGroup、Column是VFP系统中的对象,它们当中不能直接加到表单中的对象是【Column】.在表单设计器中设计表单时,如果从数据环境设计器中将表拖放到表单中,则表单中将会增加一个【表格】对象,如果从数据环境设计器中将某表的逻辑型字段拖放到表单中,则表单中将会增加一个【复选框】对象.如果要将某选项按钮组上的按钮设置为5个,应把选项按钮组的【ButtonCount】属性值设定为5.某表格上有一个命令按钮,该命令按钮的Click事件过程代码中含有一条命令,可以将该表单中的页框Pg1的活动页面改为第三个页面,该命令为:ThisForm.Pg1.【ACTIVEPAGE】=3复选框(CheckBox)的Value属性值指定控件的当前状态,其取值可以为1、2或【0】三种,以表示不同的状态.文本框控件的【PASSWORDCHAR】属性设置为*时,用户键入的字符在文本框内显示为*,但属性Value中仍保存键入的字符串.页框对象是包含页面的容器对象.在默认情况下,一个页框对象包含两个页面对象,如果要修改页框对象所包含的页面对象数,则应该修改页框的【pagecount】属性值.容器型对象表格所包含的对象是【列】表格控件可以设定特殊格式,使得用户更容易浏览表记录.如果要将表格的第三列(Column3)的前景色设为用红色显示不及格的成绩(字段名为cj),用蓝色显示及格的成绩,可以在表格的Init事件中包含如下代码:This.Column3.DynamicForeColor='【IIF(CJ60,RGB(255,0,0),RGB(0,0,255))】'VFP有两种对象：容器对象和控件对象。选项按钮组是【容器】对象,它的Value属性表明用户选定了哪个按钮,假定现有一个选项按钮有六组选项按钮,该选项按钮组的Controlsource属性值是一个整型字段,如果用户选择了第四个按钮,则选项按钮组的Value属性值为【4】.某表单的数据环境中有一个ZY(专业)表,该表有27条记录;表单上有3个文本框分别与专业表的专业代号、专业名称、学制字段绑定,另有一文本框(textl)用来显示物理记录号;表单上有一个计时器控件,其Interval属性值为1000,Timer事件代码如下:IFEOF()GOTOTOPELSESKIPENDIFTHISFORM.Textl.Value=RECNO()THISFORM.Refresh若该表单最大化按钮不可用,最小化按钮和关闭按钮可用,则表单的【MaxButton】属性值为.F.;若文本框textl不能响应用户引发的事件,则其【Enabled】属性值为.F.;当ZY表的记录指针位于记录结束标记处(即EOF()为.T.)时,文本框textl的Value属性值是【28】.某表单上有一个表格控件,其列数为7,若要使第3~7列的标头(Header)的标题依次显示为成绩1、成绩2、成绩3、成绩4、成绩5,则可在表格的Init事件处理代码中包含下列程序段.FORi=3To7This.【Columns(i)】.Header1.Caption=成绩+【Str(I-2,1)】ENDFOR所有容器对象都具有与之相关的记数属性和集合属性,其中【集合】属性是一个数组,可以用以引用其包含在其中的对象.某表单上有一个文本框控件,若要该文本框的初值设置为当前系统日期,则可以在该文本框的Init事件代码中设置语句【this.value=date()】某表单(frml)上有一个列表框(List1)、一个文本框(Text1)和一个命令按钮(Command1,其Caption属性为添加).请完善命令按钮的Click事件代码以实现以下功能:在文本框Text1中输入字符串,如果该字符串在列表框中不存在,就将该字符串插入到列表框中,否则弹出对话框给出信息提示该字符串已经存在,请重新输入.运行表单时参考界面如图所示.flag=0FORn=1TOTHISFORM.List1.【ListCount】IFTHISFORM.List1.List(n)=thisform.【Text1.Value】flag=1ENDIFENDFORIFflag=0Thisform.List1.【AddItem】(THISFORM.text1.Value)ELSEMESSAGEBOX(改字符串已经存在,请重新输入)ENDIF在某表单运行时,表单上某个命令按钮的标题是灰色的,不能响应用户事件,则该命令按钮此时【ENABLED】属性值一定为.F..在VFP中,利用可是化开发工具(表单设计器)创建表单和对象.通过对对象属性的修改、方法程序的调用来处理对象.相对引用对象时,所设计的关键字THIS、THISFORM、THISFORMSET只能在方法程序或【事件】处理代码中使用.某城市机动车驾驶员登记表(JDCJS)中含有驾驶证号(jzh)等字段.但由于录入人员的差错,包含了一些重复的记录(jzh字段的值有重复),影响了统计结果.完善下列程序,使其可以物理删除该表中的重复数据.【程序清单】USEJDCJSINDEXONjzhTAGjzh&&相同的驾驶证号记录将相邻排列GOTOPlast_jzh=jzhSKIPDOWHILE!EOF()IFjzh=last_jzhDELETEELSE【last_jzh=jzh】ENDIFSKIPENDDOPACK设某表单上有一个页框控件,该页框控件的PageCount属性值在表单的运行过程中可变(即页数会变化).如果要求在表单刷新时总是指定页框的最后一个页面为活动页面,则可在页框控件的Refresh事件代码中使用语句:This.【ActivePage】=This.PageCount第40题（1.0分）题号:141编辑框的用途与文本框相似,但编辑框除了可以编辑文本框能编辑的字段类型以外,还可以编辑【备注】型字段.某电子表表单