VF教程-表单设计
1. 表单设计：请设计一个表单，如图，有三个标签，三个文本框，一个命令按钮。在前两
要求设置下列属性：表单的标题(Caption)、表单运行时自动居中(AutoCenter)；三个标签的标题(Caption)、字体大小(FontSize)和粗体
(ReadOnly)2. 3. 设计下面的表单。要求修改：表单标题，表单运行时自动居中；上面的标签的标题、字
体大小、字体加粗、并设置其WordWrap 【自动分行】为.t.；下面两个标签的字体、字体大小、字体加粗、字体斜体、自动调整大小、forecolor ；添加两个文本框；命令按钮中标题、字体大小、并添加图片【picture 属性、图片内容自定】。
命令按钮中click 事件的代码为：【直接从这里复制】
x=thisform.text1.value
y=thisform.text2.value
if x="abc" and y="123"
messagebox("西华大学欢迎您！",0+64,"您好！")
else
messagebox("用户名或密码错误",2+48+256,"错误！")
endif
4. 按照下面的表单设计一个表单界面：（学生表的显示）
注意： 修改每个文本框的controlscource 属性以及使用文本框的生成器！【两种方法都要灵活掌握！】
点击上一条，显示上一条的记录，点击下一条，显示下一条的记录【忽略文件指针到文件头和文件末尾的出错】，点击退出，则退出表单。
5. 将上题中的标签和文本框删除。使用设置数据环境，再从数据环境中的字段拖动到表
单中的方法来设置控件：【这种方法简单实用】
6. 多表的显示：
显示学生表、成绩、课程表中的不同字段：【注意：数据环境中三个表文件建立关联】
7. 命令按钮组：将第5题中的三个命令按钮删除，修改为一个命令按钮组，并在命令按钮
组的click 事件中添加程序代码，实现相应的操作【使用Do Case 语句】。
8. 使用生成器，编辑一个选项按钮组，并修改其value 属性为0【不选中任何值】【该题为
练习，不保存成文件】
9.列表框和组合框：1）设计一个组合框，组合框中显示姓名【使用生成器】，当选择一
个姓名后，点击“查询”按钮，在各控件中分别显示其数据。
2）将上面的组合框修改为列表框，显示学号和姓名，并设置返回值为姓名字段。【使用生成器，修改显示字段和值】
该作业完成后，请完成表单PPT上提到的未来教育模拟系统中提到的题目。上课的PPT文档请在//10.36.1.9下载。
vf课程设计实验报告模板
vf 课程设计实验报告模板 经济管理学院 学生信息管理系统的设计与实现 09年12 月28 日 、课程设计的目的和意义 当今，人类正在步入一个以智力资源的占有和配置，知识生产、分配和使用为最重要因素的知识经济时代，为了适应知识经济时代发展的需要，大力推动信息产业的发展，我们通过对学生信息管理系统的设计，来提高学生的操作能力，及对理论知识的实践能力，从而提高学生的基本素质，使其能更好的满足社会需求。 学生信息管理系统是一个简单实用的系统，它是学校进行学生管理的好帮手。 此软件功能齐全，设计合理，使用方便，适合各种学校对繁杂的学生信息进行统筹管理，具有严格的系统使用权限管理，具有完善的管理功能，强大的查询功能。它可以融入学校的信息管理系统中，不仅方便了学生信息各方面的管理，同时也为教师的管理带来了极大地便利。 我们进行本次课程设计的主要目的是通过上机实践操作，熟练掌握数据库的设 计、表单的设计、表单与数据库的连接、SQL语言的使用和了解它的功能：数据定 义、数据操纵、数据控制，以及简单VF程序的编写。基本实现学生信息的管理, 包括系统的登录、学生信息的录入、学生信息的浏览、学生信息的查询、学生信息的修改和学生信息的删除，并对Visual FoxPro6.0 的各种功能有进一步的了解，为我们更进一步深入的学习奠定基础，并在实践中提高我们的实际应用能力，为我们以后的学习和工作提供方便，使我们更容易融入当今社会，顺应知识经济发展的趋势。 - 1 -
、系统功能设计 通过该系统可以基本实现学生信息的管理，包括系统的登录、学生信息的录 入、学生信息的浏览、学生信息的查询、学生信息的修改和学生信息的删除。系统 功能模块如下图所示。 学生信息管理系统主界面 登录 管理 学学学学学 生生生生生 信信信信信 息息息息息 录查浏修删 入询览改除 三、系统设计内容及步骤 3.1创建项目管理文件 1.启动foxpro 系统，建一个项目管理器，命名为“学生管理”。 哑 目f ■ 也 电 岂同左 矣 氏H. 0 存 JI 蛋誤曾
vf表单程序题(含答案)
1、利用文本框和标签控件设计了一表单，文本框Text1的Valid事件代码及表单界面如图1所示。向Text1中输入一段字符：”Figure 1-18 shows you how to use a MENU.”（不含双引号）[ event] x=alltrim 0 to z1,z2 for i=1 to y a=substr(x,i,1) do case case asc(a)>=65 and asc(a)<=90 z1=z1+1 case asc(a)>=97 and asc(a)<=122 z2=z2+1 endcase endfor （1）执行该程序后，“统计1”右边的文本框Text2和“统计2”右边的文本框Text3中的数据值分别为5、22 （2）Text2和 Text3的初值分别为 0、0 2、有数据表“图书.DBF”包含书号、书名、出版社、作者等字 段，设计如图1所示表单，表单运行后，单击命令按钮可以在 表格控件中显示图书表的部分字段的数据，如图1所示，请选 择并完善代码。 命令按钮的CLICK事件代码： USE 图书 copy TO TS FIELDS 书号,书名 =”TS” 表单的UNLOAD（释放对象时发生）事件： CLOSE ALL DROP TABLE TS 3、考生数据表（文件名为：）中有“准考证号/C/9”、“密码/C/6”、 “成绩/N/5/1”等字段。设计如图2所示表单，将考生数据表
添加到表单的数据环境中，表单运行后，在表单的文本框TEXT1中输入查询考生的准考证号，文本框TEXT2中输入该考生的查询密码后，单击“查询”按钮，查询该考生的成绩，并将该考生的成绩显示在表单的标签LABEL3中（考号或密码输入错误，则弹出提示窗口显示“准考证号或密码错误！”）。请选择并完善代码。 “查询”按钮的CLICK事件代码如下： SELECT KS KH=ALLTRIM for 准考证号=KH and密码=MM IF FOUND() THISFORM..=str(成绩，5，1) ELSE MESSAGEBOX(“准考证号或密码错误！”) ENDIF 4、设计如图3所示表单，表单运行后，要在表格中显示图书表中数量 最少的3种图书信息，请选择并完善代码。 表单FORM1的INIT事件代码如下： top 3 * ROM 图书; Order by数量 INTO CURSOR TEMP” 5、有学生成绩表（文件名：），表中数据如下所示，设计如图5所示表单，将学生成绩表添加到表单数据环境中，表单运行时，单击“统计”命令按钮，LABEL1显示课程名为计算机基础且成绩在80以上的平均成绩，LABEL2显示这些记录的绩点总和 学生成绩表（文件名：） 姓名课程名成绩绩点 陈兵计算机基础924 杨昆计算机基础681 江三计算机基础883 陈兵程序设计803 杨杨电子商务702 杨杨计算机基础904 图5 （1）程序填空：“统计”命令按钮的CLICK事件代码如下：
实验八 表单设计VF
实验八表单设计 一、实验目的 1.熟悉表单设计器的使用。 2.掌握表单设计的基本过程和方法。 3.掌握表单的常用属性，方法和事件。 4.掌握标签、编辑框、命令按钮、组合框、列表框、表格、等常用控件的 使用。 二、实验内容和步骤 １．建立一个如下图所示表单： 图1 学生登录窗口 要求实现： （1）系统初次载入时，不显示文字“学生成绩登录系统”，单击窗体右键时，显示文字“学生成绩登录系统”。 （2）单击“登录”按钮时，用户名所对应的文本框的背景色为红色。 （3）单击“退出”按钮时，密码所对应的文本框消失。 （4）双击窗体时，两文本框恢复正常。 设计步骤： ①选择“文件/表单/新建文件”，打开表单设计器。 ②在表单上添加三个标签（Label1、Label2、Label3）、两个文本框（Text1、 Text2）和一个命令按纽（Command1）。 ③设置表单、控件属性如下表所示。
表1 属性设置 ④编写相应事件过程代码。 ●表单Form1的Init事件过程代码： https://www.sodocs.net/doc/729784743.html,bel1.visible=.F. ●表单Form1的Rightclick事件过程代码： https://www.sodocs.net/doc/729784743.html,bel1.visible=.T. ●命令按钮Command1的Click事件过程代码： Thisform.text1.backcolor=RGB(255,0,0) ●命令按钮Command2的Click事件过程代码： Thisform.Text2.visible=.F. ●表单Form1的dblclick事件过程代码： Thisform.text1.backcolor=rgb(255,255,255) Thisform.text2.visible=.T. ⑤保存表单，命名为“表单01”。 ⑥运行该表单，验证是否达到要求。 2.设计一个登录表单，当用户输入用户名和口令并按确认键后，检验其输入是否正确，若正确(假定用户名为“USER”,口令为“123”)，就显示“欢迎使用”字样并关闭表单；若不正确，显示“用户名或口令不对，请重输…”字样（要求口令输入时显示星号*），连续三次都输入不正确，显示“输入次数超过三次，你无权使用本系统”。
vf表单控件的使用说明
一、标签 标签能够显示多个字符构成的文本，用于设计表单上所需的文字性提示信息。标签和大多数控件的不同点在于运行表单时不能用《tab》键来选择标签。 常用的标签属性及其作用如下。 1、Caption：确定标签处显示的文本。 2、Visible：设置标签可见还是隐藏。 3、AutoSize：确定是否根据标签上显示文本的长度，自动调整标签大小。 4、BackStyle：确定标签是否透明。 5、WordWrap：确定标签上显示的文本能否换行。 6、FontSize：确定标签上显示文本所采用的字号。 7、FontName：确定标签上显示文本所采用的字体。 8、ForeColor：确定标签上显示的文本颜色。 二、命令按钮和命令按钮组 在各种窗口或对话框中几乎都要使用一个或多个命令按钮。一旦用户单击一个命令按钮，就可实现某种规定的操作。例如，各种对话框中的“确定”按钮，当用户单击时将结束对话框的操作。 VisualForPro中的命令按钮控件同样用于完成特定的操作。操作的代码通常放在命令按钮的“单击”事件（即Click Event）代码中。这样，运行表单时，当用户单击命令按钮时便会执行Click事件代码。如果在表单运行中，某个命令按钮获得了焦点（这时，这个命令按钮上会比其他命令按钮多一个线框），则当用户按下《Enter》键或空格键时，也会执行这个命令按钮的Click时间代码。 常用的命令按钮属性及其作用如下： 1、Caption：设置在按钮上显示的文本。 2、Default：在表单运行中，当命令按钮以外的某些控件（如文本框）获得焦点时，若 用户按下《Enter》键，将执行Default属性值为.T.的那个命令按钮的click事件代码。 3、Cancel：如果设置该属性值为.T.，则当用户按下
VF中表单的常用属性在这里给大家惊情奉献哦
VF中表单的常用属性在这里给大家惊情奉献哦 设计时常用的表单属性，定义表单的外观和行为： 属性说明（默认值） AlwaysOnTop 控制表单是否总是处在其他打开窗口之上。(.F.) AutoCenter 控制表单初始化时是否让表单自动地在Visual FoxPro主窗口中居中。(.F.) BackColor 决定表单窗口的颜色。(255,255,255) BorderStyle 决定表单是否没有边框，还是具有单线边框、双线边框或系统边框。(3) Caption 决定表单标题栏显示的文本。(Form1) Closable 控制用户是否能通过双击“关闭”框来关闭表单。(.T.) DataSession 控制表单或表单集里的表是否能在可全局访问的工作区中打开，或仅能在表单或表单集所属的专有工作区内打开。(1) MaxButton 控制表单是否具有最大化按钮。(.T.) MinButton 控制表单是否具有最小化按钮。(.T.) Movable 控制表单是否能移动到屏幕的新位置。(.T.) ScaleMode 控制对象的尺寸和位置属性的度量单位是foxels还是像素。由“选项”对话框中的设置决定。 Scrollbars 控制表单所具有的滚动条类型。(0) TitleBar 控制标题栏是否显示在表单的顶部。(1) ShowWindow 控制表单是否在屏幕中、悬浮在顶层表单中或作为顶层表单出现。(0) WindowState 控制表单是否最小化、最大化还是正常状态。(0) WindowType 控制表单是否非模式表单（默认）还是模式表单。(0) 属性一览表 Activate Event 当表单集、表单或页对象激活时、或显示工具栏对象时发生。ActiveControl 引用一个对象上的活动控件。 ActiveForm 引用表单集或_SCREEN对象中的活动表单对象。Addobject 在运行时向容器对象中添加一个对象。 AddProperty 向对象添加新属性。 Alignment 控件上正文水平对齐方式。 AlwaysOnBottom 防止其他窗口被表单窗口覆盖。 AlwaysOnTop 防止其他窗口遮挡表单。 Autocenter 指定Form对象在首次显示时，是否自动在VFP主窗口内居中。 AutoSize 控件是否根据正文自动调整大小。 BackColor 指定对象内文本和图形的背景色。 BackStyle 设置背景风格。 BaseClass 指定VFP基类的类名，被引用对象由此基类派生得到。BorderStyle 指定对象的边框样式。
vf表单设计
【例1】若某表单中有一个文本框Text1和一个命令按钮组CommandGroup1，其中，命令按钮组包含了Command1和Command2两个命令按钮。如果要在命令按钮Command1的某个方法程序中访问文本框Text1的Value属性值，下列句子中正确的是________。 （A）This.ThisForm.Text1.Value （B）This.Parent. Text1.Value （C）Parent.Parent. Text1.V alue （D）This.Parent. Parent.Text1.Value （注：答案（D）属于相对引用方式，如果使用绝对引用方式，则应写为：Form1.Text1.Value）【例2】在表单中加入两个命令按钮Command1和Command2，编写Command1的Click 事件代码如下，则当单击Command1后，________。 ThisForm. Parent. Command2.Enabled=.F. （A）Command1命令按钮不能激活 （B）Command2命令按钮不能激活 （C）事件代码无法执行 （D）命令按钮组中的第二个按钮不能激活 （注： ①①命令按钮的Enabled属性值为.F.时，该控件将以浅色显示，表示此按钮 当前无效。 ②②ThisForm. Parent. Command2.Enabled=.F.事件代码的功能实际将当前表 单的父对象中的命令按钮Command2的Enabled属性值设置为.F.。答案（C） 该事件代码无法执行，是因为对Command2对象的引用和描述不正确。 ③③如果要使Command2命令按钮不能激活，正确的事件代码应为： This. Parent. Command2.Enabled=.F. 即将当前对象（命令按钮Command1）的父对象（当前表单）中的Command2命令按钮的Enabled属性值设置为.F.。） 【例2】可选择不同字体的表单 操作步骤如下： 1. 1.打开“表单设计器”或“MODIFY FORM……” 2. 2.添加两个标签、一个文本框、一个选项按钮组、一个命令按钮，放在合适位 置并调整其大小。 3. 3.设置属性： 控件名称属性名设置值 Label1 Caption 请输入文本内容： FontSize 18 AutoSize .T. Label2 Caption 请选择字体： AutoSize .T. FontSize 18 Text1 FontBold .T. &&设定为粗体字 FontSize 26 ForeColor 0,0,255 &&设置文本为蓝色Command1 Caption 关闭 注：有关颜色设置 RGB函数能返回一种颜色，它的格式为： RGB(nRedValue，nGreenValue，nBlueValue) 其中3个参数分别表示颜色中含有红、绿、蓝的成分，范围都是0～255。 在属性窗口可以查看RGB参数。 4. 4.设置选项按钮组Optiongroup1：右击——生成器——在“按钮”选项卡中设 置按钮数为4，将表格标题列的4项标题分别设置为：“黑体”、“宋体”、“隶书”、
VF练习5 表单设计
一、填空题 1.Visual FoxPro提供了3种方式来创建表单，它们分别是使用表单生成器创建表单；使用表单设计器创建一个新的表单或修改一个已经存在的表单；使用“表单”菜单中的表单向导命令创建一个简单的表单。 2.为了在程序中能显示已经创建的MyForm1表单对象，应使用命令运行。 3.在命令窗口中执行DO FORM命令，即可打开表单设计器窗口。 4.将设计好的表单存盘时，将产生扩展名为.SCT和.SCX的两个文件。 5.在面向对象程序设计中，对象具有4个主要的特性分别是：抽象性、继承、封装和多态。 6.类是一组具有相同属性和相同操作的对象的集合，类中的每个对象都是这个类的一个实例；类之间共享属性和操作的机制称之为继承；一个对象通过发送消息来请求另一个对象为其服务。 7.控件的数据绑定是指该控件与某个数据源联系起来，实现某个控件的数据绑定需要为该控件指定数据源，实际设置时由该控件的ControlSource属性来指定。 8.一个应用程序通常包含多个对象，但某个时刻仅允许对一个已被选定的对象进行操作。某个对象被选定，它就获得了焦点。例如：ThisForm.Text1.Set Focus，就表示指定<对象>获得焦点。 9.“类”是面向对象程序设计的重要内容，Visual FoxPro提供了一系列基类来支持用户派生出新类，Visual FoxPro中的两种基类是容器类与控件类。 10.在Visual FoxPro中，可以有两种不同的方式来应用一个对象，以下第一个命令应用对象的方式称为绝对引用；第2个命令的应用方式称为相对引用。 https://www.sodocs.net/doc/729784743.html,mand1.Caption = “确定” This.Caption = “确定” 11.现实世界中的每一个事物都是一个对象，对象所具有的特征被称之为 属性；对象的方法就是对象可以执行的动作或它的行为。 12.Visual FoxPro提供了一批基类，用户可以在这些基类的基础上定义自己的类和子类，从而利用类的继承性，减少编程的工作量。 13.类是对象的集合，它包含了相似的有关对象的特征和行为方法，而 对象则是类的实例。 14.用类来创建对象的函数是CREATOBJECT ；其括号内的自变量就是一个已有的类名，该函数返回一个对象。 15.在OOP中，封装是将数据和处理数据的操作放在一起。对于一个对象来说，就是将该对象的属性和方法放到单独的一段源代码中。 16.在OOP中，类具有封装性、层次性和继承性的特征，这就大大加强了代码的重用性。 17.在Visual FoxPro中，在创建对象时发生的事件是Init；从内存中释放对象时发生的事件是Destroy ；用户使用鼠标双击对象时发生的事件是
VF教程-表单设计
1. 表单设计：请设计一个表单，如图，有三个标签，三个文本框，一个命令按钮。在前两 要求设置下列属性：表单的标题(Caption)、表单运行时自动居中(AutoCenter)；三个标签的标题(Caption)、字体大小(FontSize)和粗体 (ReadOnly)2. 3. 设计下面的表单。要求修改：表单标题，表单运行时自动居中；上面的标签的标题、字 体大小、字体加粗、并设置其WordWrap 【自动分行】为.t.；下面两个标签的字体、字体大小、字体加粗、字体斜体、自动调整大小、forecolor ；添加两个文本框；命令按钮中标题、字体大小、并添加图片【picture 属性、图片内容自定】。
命令按钮中click 事件的代码为：【直接从这里复制】 x=thisform.text1.value y=thisform.text2.value if x="abc" and y="123" messagebox("西华大学欢迎您！",0+64,"您好！") else messagebox("用户名或密码错误",2+48+256,"错误！") endif 4. 按照下面的表单设计一个表单界面：（学生表的显示） 注意： 修改每个文本框的controlscource 属性以及使用文本框的生成器！【两种方法都要灵活掌握！】 点击上一条，显示上一条的记录，点击下一条，显示下一条的记录【忽略文件指针到文件头和文件末尾的出错】，点击退出，则退出表单。 5. 将上题中的标签和文本框删除。使用设置数据环境，再从数据环境中的字段拖动到表 单中的方法来设置控件：【这种方法简单实用】
使用VF制作系统登录表单
使用VF制作系统登录表单 0有很多应用程序需要一个登陆窗口，本例将制作一个简单的登录表单，系统运行时首先启动此登录表单，运行界面如下图： 输入正确的用户名及密码才会启动主表单，如下图；若连续3次输入错误的用户名及密码则会自动退出。 制作步骤如下： 1、新建表单，将表单的caption属性值设置为“系统登录”，ShowWindow属性值设置为“2-作为顶层表单”，width属性值设置为295，height属性值设置为100，AutoCenter属性值设置为，并将表单保存为“系统登录.scx”。 2、继续设置该表单的属性：将表单的MaxButton及MinButton属性值均设置为.f.，这样就屏蔽掉了表单的最大化和最小化按钮，成为只有一个关闭按钮的对话框。 3、向表单添加两个label控件，将它们的caption属性值分别设置为“用户名”和“密码”。 4、向表单添加两个文本框控件，并将其中的Text2的PasswordChar属性值设置为“*”。 5、向表单添加两个ming令按钮command1和command2，将它们的caption属性值分别设置为“确定”和“退出”。 6、适当调整各控件在表单上的位置及大小，调整后的表单设计器如下图： 7、右击表单空白处，选“数据环境”ming令，将“管理”表添加到表单的数据环境中。 8、添加事件代码： （1）表单的init事件代码： public cn &&声明全局变量,用于计算登录次数 cn=0 (2) 表单的unload事件: close all clear events quit （3）接收用户名的文本框Text1的KeyPress事件代码： LPARAMETERS nKeyCode, nShiftAltCtrl if nKeyCode=13.and.!empty(this.value) &&输入用户名后按回车即进入输密码thisform.Text2.enabled=.t. thisform.Text2.setfocus endif （4）“确定”按钮command1的click事件代码： cname=alltrim(thisform.text1.value) ppassword=alltrim(thisform.text2.value) cn=cn+1 if cn=3 thisform.release endif set exact on go top
VF 表单题
1.设计一个名为Form1的表单，表单上有两个命令按钮（Command1、Command2）：“计算” 和“退出”，两个文本框（Text1、Text2），三个标签（Label1、Label2、Label3），标签显示内容分别为：“数学”、“物理”和“总分=”，运行表单，单击“计算”按钮，求出数学和物理的和，并在标签三中输出计算结果；单击“退出”按钮，关闭表单。 Command1 click事件代码： a=val(thisform.text1.value) b=val(thisform.text2.value) S=a+b https://www.sodocs.net/doc/729784743.html,bel3.caption=str(s,4,1) Command2 click事件代码： thisform.release 2.设计一个名为Form1的表单，表单上有两个命令按钮（Command1、Command2）分别为: “显示”和“关闭”；三个文本框（Text1、Text2、Text3）；四个标签（Label1、LABEL2、LABEL3、LABEL4）分别为:“显示日期为：”、“年”、“月”、“日”，运行表单，单击“显示”按钮，三个文本框中分别输出系统当前的“年、月、日”；单击“关闭”按钮，关闭表单。Command1 click事件代码： Thisform.text1.value=year(date()) Thisform.text2.value=month(date()) Thisform.text3.value=day(date()) Command2 click事件代码： thisform.release 3.设计一个名为FORM1的表单，表单上有两个命令按钮（COMMAND1、COMMAND2）、两个文本框（TEXT1、TEXT2）和两个标签（LABEL1、LABEL2），按钮标题分别为“计算”和“关闭”、两个标签分别显示“请输入N的值”，“N！=”字样，两个文本框分别用来接收输入的N值和输出N！。运行表单，在第一个文本框中输入N的值，单击“计算”按钮计算N！，并在第二个文框中输出计算结果；单击“关闭”按钮，关闭表单。 Command1 click事件代码： n=val(thisform.text1.value) p=1 For i=1 to n p=p*i Endfor Thisform.text2.value=str(p) Command2 click事件代码： thisform.release 4.设计一个名为FORM1的表单，表单上有三个标签（LABEL1、LABEL2、LABEL3），标题分别为“选课系统”、“图书管理系统”、“成绩查询系统”，当用鼠标单击任何一个标签时，其他两个标签的标题文本互换。 LABEL1的CLICK事件代码：
VF 表单设计
1、用表单设计一个登录界面，如图下所示，当用户输入用户名和口令后，按确认键检验输入是否正确（假设用户名为abcdef，口令为654321）。如果输入正确，就显示“欢迎使用……”；如果输入不正确，则显示“用户名或口令不对，请重输……”；如果三次输入都不正确，就显示“用户名或口令不对，登录失败！”并且关闭表单。 操作步骤如下： （1）新建表单，然后在表单上添加两个标签、两个文本框和一个命令按钮。 （2）设置两个标签和一个命令按钮的caption属性为“用户名：”、“口令：”和“确认”。 （3）将命令按钮“确认”的default的属性值设置为.t.。 （4）设置文本框text2的inputmask属性值，在设置框中直接输入999999或输入“999999”。 （5）设置文本框text2的passwordchar属性为“*”。 （6）选择“表单”下的“新建属性”命令，打开“新建属性”对话框，为表单添加新属性numc。在“属性”窗口中将默认值设置为0。 （7）用鼠标双击“确认”按钮，打开编辑事件代码窗口，在click事件中输入下面的代码： if thisform.text1.value="abcdef" and thisform.text2.value="654321" wait "欢迎使用……"window timeout 3 thisform.release else thisform.numc=thisform.numc+1 if thisform.numc=3 wait "用户名或口令不对，登录失败！"window timeout 3 thisform.release else wait "用户名或口令不对，请重输……"window timeout 3 endif endif 2、用编辑框做一个趣味小实例——摸奖机，程序运行界面如下：
(VF)表单代码
标签互换 如样张所示设计一个名为Form1的表单，表单上有三个标签（Label1、Label2、Label3）， 标题分别为“选课系统”、“图书管理系统”、“成绩查询系统”，当用鼠标单击任何一个 标签时，其他两个标签的标题文本互换。 Label1：click事件 t=https://www.sodocs.net/doc/729784743.html,bel2.caption https://www.sodocs.net/doc/729784743.html,bel2.caption=https://www.sodocs.net/doc/729784743.html,bel3.caption https://www.sodocs.net/doc/729784743.html,bel3.caption=t label2: click事件 t=https://www.sodocs.net/doc/729784743.html,bel1.caption https://www.sodocs.net/doc/729784743.html,bel1.caption=https://www.sodocs.net/doc/729784743.html,bel3.caption https://www.sodocs.net/doc/729784743.html,bel3.caption=t label3: click事件 t=https://www.sodocs.net/doc/729784743.html,bel1.caption https://www.sodocs.net/doc/729784743.html,bel1.caption=https://www.sodocs.net/doc/729784743.html,bel2.caption https://www.sodocs.net/doc/729784743.html,bel2.caption=t 12（大小写改换） 如样张所示设计一个名为Form1的表单，该表单的功能是：
有两个标签（Label1、Label2）， 分别是“小写”和“大写”。在TEXT1中输入一个小写字母，然后点击“转换”按钮（Command1）， 就能在TEXT2中输出其大写字母。单击“清除”按钮（Command2），则清除TEXT1和TEXT2中的 内容；单击“退出”按钮（Command3）退出程序。 转换：click事件 if thisform.text2.value='' thisform.text2.value=upper(thisform.text1.value) endif 清除：click事件 thisform.text1.value='' thisform.text2.value='' 退出：click事件 release thisform （存款本息和） 如样张所示设计一个名为Form1的表单，有三个标签（Label1、Label2、Label3），分别为 金额、存期、到期本息和。三个文本框（Text1、Text2、Text3）要求根据用户输入的存款额
vf题库 表单 操作题讲解
表单操作题 1 设计一个名为Frm01的表单，表单的控件名和文件名均为Frm01。表单的形式如下图所示。要求如下： 1. 表单标题为"零件供应情况"，表格控件为Grid1，命令按钮"查询"为Command1、"退出"为Command2，标签控件Label1 和文本框控件Text1(程序运行时用于输入工程号)。 2. 运行表单时，在文本框中输入工程号，单击"查询"命令按钮后，表格控件中显示相应工程所使用的零件的零件名、颜色和重量(通过设置有关"数据"属性实现)，并将结果按"零件名"升序排序存储到pp.dbf文件。 单击"退出"按钮关闭表单。 答题要求： (1)将表格的recordsourcetype属性设为“0” (2）查询的单击事件： 使用select语句，将查询结果存到一个表pp.dbf中，然后再将表格grid1的recordsource属性设为"pp" (3)表单备注文件不能删除 查询按钮代码： SELECT 零件.零件名, 零件.颜色, 零件.重量; FROM 供应零件!供应INNER JOIN 供应零件!零件; ON 供应.零件号= 零件.零件号; WHERE 供应.工程号= thisform.text1.value; ORDER BY 零件.零件名; INTO TABLE pp.dbf thisform.grid1.recordsource=null &&这句话可以删除 thisform.grid1.recordsource="pp" thisform.grid1.refresh thisform.refresh 3 求1到100以内的奇数，单击"计算"按钮后,首先清除列表框中原先的内容，然后显示结果，单击"退出"按钮后退出表单。表单文件名为Frm03.scx。 要求： 1.窗体命名为frm03.scx(表单备注文件不能删除） 2.窗体的标题为：求100以内的奇数 3.命令按钮"计算"(名称为command1),"退出"(名称为command2) 4.列表框名称为list1 5.判断一个数是否为奇数使用语句“i%2<>0”，即i除2不等于0 6.列表框中增加一项使用语句“additem(str(i))” 7.要求使用for循环语句 8.退出表单用release语句 计算按钮的代码： thisform.list1.clear
VF数字化程序及表单设计
数字化程序及表单设计 1．（prog1.prg，form1.scx）已知圆半径，求圆面积。 clear input"请输入圆的半径=" to r if r>0 s=pi()*r*r ?s else ?"输入错误！" endif return r=thisform.text1.value s=pi()*r*r thisform.text2.value=alltrim(str(s,10,2)) 4．（prog2.prg，form2.scx）已知三角形三边，求三角形的面积。S=SQRT(L*(L-A)*(L-B)*(L-C)) ，其中L=(A+B+C)/2 clear input"a=" to a input"b=" to b input"c=" to c if a>0 b>0 c>0 a+b>c a+c>b b+c>a l=(a+b+c)/2 s=sqrt(l*(l-a)*(l-b)*(l-c)) ?s else ?"输入错误" Endif a=thisform.text1.value b=thisform.text2.value c=thisform.text3.value if a+b>c and b+c>a and a+c>b and a>0 and b>0 and c>0 l=(a+b+c)/2 s=sqrt(l*(l-a)*(l-b)*(l-c)) endif thisform.text4.value=s 5．（prog3.prg，form3.scx）判断某一年是否是闰年。 clear input"请输入年份:" to year if year%400=0 ?year,"年是闰年!" else ?year,"年不是润年!" endif return year=thisform.text1.value if year%400=0 thisform.text2.value= "是闰年" else thisform.text2.value= "不是闰年" endif 6．（prog4.prg，form4.scx）判断月份值的春夏秋冬。 clear input"请输入月份:" to yue do case case inlist (yue,3,4,5) ?"春" case inlist (yue,6,7,8) ?"夏" case inlist (yue,9,10,11) ?"秋" case inlist (yue,12,1,2) ?"冬" otherwise ?"输入错误" endcase return