vf表单设计

合集下载

vfp 设计一个表单 (计算器)

vfp 设计一个表单 (计算器)

设计一个表单,功能相当一个简单的计算器,可以进行加减乘除运算。

界面如下图:S1:新建表单,命名为jsq.scx。

表单的caption(标题)属性为“计算器”。

将表单适当拉长一些。

S2:在表单中添加一个文本框,其name属性为“aa”;Width属性为200。

S3:在表单中添加一个命令按钮command1,前景(ForeColor属性)色为“红”,caption为“+”。

(注意字符应为西文字符)S4:将按钮复制出三个,其caption分别为“-”、“*”、“/”。

S5:在表单中添加一个命令按钮command5,前景(ForeColor属性)色为“蓝”,caption为“1”。

S6:复制按钮,共12个。

将其余11个按钮的caption分别改为2、3、4、…、0、清零、关闭。

S7:添加按钮“1”的Click事件代码:THISFORM.aa.V alue= THISFORM.aa.V alue+”1”S8:其余2~0按钮的代码相似。

S9:添加按钮“结果”的Click事件代码:SS=THISFORM.aa.V alueTHISFORM.aa.V alue=STR(&ss,10,3)S10:添加按钮“清零”的Click事件代码:THISFORM.aa.V alue=Space(0)S10:添加按钮“退格”的Click事件代码:N=Len(THISFORM.aa.V alue)THISFORM.aa.V alue=Left(THISFORM.aa.V alue,n-1)S10:添加按钮“关闭”的Click事件代码:THISFORM.Release思考:Left(THISFORM.aa.V alue,n-1) 与Substr(THISFORM.aa.V alue,1,n-1)相同否?。

第7章 vfp表单设计

第7章  vfp表单设计

7.2 表单向导 用户用“表单向导”创建表单非常轻松, 根据对话框窗口提示一步一步地进行设置。 操作演示:
7.4
面向对象程序设计
第六章节介绍了面向过程程序设计方法 ,强调的是解决问题的过程,不关心其中的 对象,数据与程序分离。 本章介绍面向对象程序设计方法,以对 象为中心,将数据与程序捆绑在一起,封装 在对象中,淡化解决问题的过程。
表单事件: Load:创建表单时发生的事件; Init:表单被装入内存时发生的事件; Activate:表单被激活时发生的事件; Unload:表单释放时发生的事件。
3、对象方法程序 对象方法程序是VFP为对象内定的通用过 程,能使对象执行一个行为或动作。 Cls、Refresh、Release 调用格式:[对象引用].方法名[(实参)]
三、数据环境设计器的使用 (1)打开数据环境设计器 (2)添加数据源(表或视图等) (3)移去数据源(表或视图等) (4)在表单中添加字段
操作演示
四、对象布局 (1)向表单添加对象 (2)表单上对象相关操作 选定对象、复制对象、删除对象 (3)对象布局操作
操作演示
7.1.3
表单属性的设置
表单的属性决定它的界面特征,如位置、 大小、色彩、标题等,还可以决定表单是否 可以缩放、移动、关闭等。 一、表单属性 打开”属性”窗口,在属性窗口中共有 60多个属性. (表7-1为表单中常用的属性)
“转换” 按钮Command1 的Click事件代码:
X=Val(Thisform.Text1.Value) Thisform.Text2.Value=9/5*X+32 “关闭”的按钮 Command2的Click事件代码: Thisform.Release
[例]设计一个表单如下:

VisualFoxPro表单设计

VisualFoxPro表单设计

第8 章表单设计一、表单的概念表单(Form)是应用程序的用户界面,也是我们进行程序设计的基础。

各种图形、图像、数据等都是通过表单或表单中的对象显示出来,因此,表单是具有各种属性、控件、事件和方法程序的容器对象。

表单在OOP中提供数据输入、修改或输出的界面。

Windows中的各种窗口与对话框均为表单的不同表现形式。

二、表单创建方法:1.菜单方式:“项目管理器”或“文件”→“新建”→“表单”2.命令方式:CREATE FORM或MODIFY FORM事际上可运用三种方式:●●表单向导:能引用用户选定表来产生实用的表维护窗口,窗口中含有所选取的字段,还包含供用户操作的各种按钮,具有翻页、编辑、查找、打印等功能。

●●快速表单●●表单设计器三、表单设计器:1.表单设计器的特点:(1)不但能创建表单,而且可修改表单。

(2)操作界面可视化,用户可利用多种工具栏、敏感菜单(这里指VFP菜单随表单设计器的打开而增加与改变的部分)和快捷菜单在表单上创建与修改对象。

(3)表单设计面向对象。

2.表单设计器打开后,有下列表单设计要素能供用户使用:(1)表单设计器窗口及其表单窗口:表单设计器窗口中的Form1窗口即表单对象,称为表单窗口。

多数设计工作将在表单窗口中进行,包括往窗口内添加对象,并对各种对象进行操作与编码。

(2)属性窗口:能显示当前对象的属性、事件和方法程序,并允许用户更改属性,定义事件代码和修改方法程序。

(3)代码窗口:用于编写事件过程和方法程序代码。

(4)表单控件工具栏:用于在表单上创建控件。

(5)调色板工具栏:用于指定一个控件的前景色和背景色。

(6)布局工具栏:用于对齐、放置控件以及调整控件大小。

(7)数据环境设计器窗口:用于提供表的数据环境。

(8)敏感菜单:表单设计器打开后,系统菜单将自动增加一个“表单”菜单;“显示”菜单、“窗口”菜单及“格式”菜单都将有所改变。

(9)随机应变的快捷菜单。

四、常用表单事件1.Load事件:表单被装入内存时发生2.Init事件:表单被初始化时发生3.Activate事件:表单被激活时发生4.Destory事件:表单被释放时发生5.Unload事件:表单被关闭时发生6.Resize事件:当用户或程序改变表单大小时发生五、常用表单方法程序1.Hide方法:隐藏表单2.Show方法:显示表单3.Release方法:释放表单4.Refresh方法:刷新表单六、对象的引用1.绝对引用通过提供对象的完整容器层次来引用对象。

vfp表单设计

vfp表单设计

1.编制“学生”表信息查询界面,要求如图1、图2、图3所示。

图1 用户选择前的运行界面图2 用户选择同学后的运行界面图3 控件的布局界面2.编制一个表单完成表文件“学生.dbf”内容的学生奖学金查询显示功能(界面如图所示)。

要求:①当用户在组合框输入或选择班级(学号的左三位)后,按回车或“确定”按钮时,表单将自动显示对应班级的奖学金总额;②按“退出”按钮时,自动关闭表单。

图:用户选择确定后的运行界面3.建立一个表单,通过控件的事件代码控制,实现表单顶行的标签信息向下平移。

设计界面如图所示:图:信息单向平移表单设计界面4.运用文本框和计时器对象设计一个数字时钟表单,界面如图1、2所示。

要求:文本框文字为隶书、20号字,表单的标题为“数字时钟”,每隔1秒钟刷新一次时间。

图1:设计界面 图2:运行界面5.设计一个圆球跳动表单。

要求:球的宽和高为40,球的填充颜色为咖啡色,表单的标题为“圆球跳动”,球每隔0.5秒在表单的上下边之间跳动。

按开始按钮球跳动,按停止按钮球停止。

设计界面和运行界面见下图所示。

6.设计一个完成口令判定功能的表单,界面如图所示。

具体要求如下:①用户从键盘输入口令时,表单的显示控件以“*”代替具体内容;②系统的口令存放在表文件“学生.dbf ”的姓名字段中,要求完全匹配;③输入口令后,按回车或按“确定”按钮,将自动显示信息框(Messagebox ),提示“正确!”或“错误!”;④按“退出”按钮将自动关闭表单。

7. 编制一个表单完成表文件“学生.dbf ”内容的自动只读浏览显示功能,界面如图所示。

具体要求如下:①表单初始显示内容为表文件“学生.dbf ”的首记录;②表单内容将以10秒为间隔自动刷新,即自动顺序向后翻记录,当翻至表底时,将自动回到首记录循环翻动。

8.编制一个显示时钟和日期的表单,界面如图所示。

命令按钮及文本框的字体、颜色和大小设置为自己喜欢的形式。

图:设计界面 图:时间显示界面图:日期显示界面9.借助于文本框和微调框编制一个手工日历表单,界面如图所示。

vfp表单设计

vfp表单设计

3.在项目管理器中运行表单
打开项目管理器,选中项目管理器中的“文档”选项卡, 选择要运行的表单,单击“运行”按钮。 13
四、创建一对多表单
【例9-2】试在图书管理系统中,运用读者表和借书表查阅 某个读者所借图书情况,创建表单(读者借书.scx)。 其操作步骤如下: (1)启动表单向导。 (2)在“向导选取”对话框中,选择“一对多表单向导”。 (4)单击“确定”按钮,出现如图9-7所示的对话框。从 父 表中选取所需字段。 (5)单击“下一步”按钮,出现如图9-8所示的对话框, 在对 话框中选择与父表有直接关系的子表,从子表中 选择 要在表单中显示的字段。 注意:在创建一个一对多表单时,两个数据表之间应该可 以建立连接关系,否则无法创建一对多表单。
14
目录
上一页
下一页
退出
目录
上一页
下一页
退出
图9-7 从父表中选取字段对话框
图9-8
从子表中选取字段对话框
15
目录
上一页
下一页
退出
(6) 单击“下一步”按钮,出现对话框。为表单中的两个 数据表之间建立关系。本例选择的是“读者编号”作为 “读者表”与“借书表”之间的关键字段。 (7) 单击“下一步”按钮,出现对话框,选择表单样式和 按钮类型,在这里选择的是“标准式”表单样式,而按 钮类型选择的是“图片按钮”。 (8) 单击“下一步”按钮,出现对话框,选择父表中的排 序关键字。在这里选取“读者编号”字段作为父表升序 排序的关键字。 (9) 单击“下一步”按钮,出现对话框,输入表单标题名, 本例输入“读者借书查询”,并选取“保存表单以备将 来使用”单选项。 (10) 运行该表单后,可得到如图9-9所示的窗口。
23
2.运用表单生成器创建表单

vfp6表单设计实例

vfp6表单设计实例

vfp6表单设计实例VFP (Visual FoxPro) 是一种关系数据库管理系统,由微软公司开发。

表单(Form)是 VFP 中用于创建用户界面的重要工具。

以下是一个简单的 VFP 6 表单设计的实例:1. 创建表单首先,打开 VFP 6,选择 "File" -> "New" -> "Form"。

这将打开表单设计器。

2. 添加控件在表单设计器中,你可以从工具箱(Toolbox)中拖放各种控件,如标签(Label)、文本框(TextBox)、命令按钮(CommandButton)等。

例如,你可以添加一个标签(Label)和一个文本框(TextBox),用于用户输入数据。

3. 设置属性选中控件后,可以在属性窗口(Properties Window)中设置各种属性,如名称、位置、大小、字体等。

例如,你可以设置标签的 `Caption` 属性为 "姓名",设置文本框的 `Name` 属性为 "txtName"。

4. 编写事件代码在 VFP 中,你可以为控件的特定事件编写代码。

例如,你可以为命令按钮的 `Click` 事件编写代码,以便在用户点击按钮时执行某些操作。

在代码窗口中输入以下代码:```vfpDO SomeProcedure```其中 `SomeProcedure` 是你要执行的过程的名称。

5. 保存表单最后,保存表单。

选择 "File" -> "Save As",并输入表单的名称和位置。

以上是一个简单的 VFP 表单设计实例。

你可以根据需要添加更多的控件和事件代码,以创建更复杂的用户界面。

VF表单的设计


6.1 面向对象的基本概念
6.1.2 对象与类 1.对象
客观世界中的任何一个具体事物都可以看成是一个 对象(Object),它是客观事物反映在人的主观世 界中所形成的一种抽象认识和描述。 无论什么对象, 通常说来都是由两个方面的基本要素构成的,一个 是对象的属性,另一个是对象的行为(或功能)。 所谓属性(Property),就是对客观事物某一方面 特征的概括和描述。 任何一个具体对象,都有它自己特定的行为,或者 说都能够根据它所接收到的来自外部的不同消息来 完成一些特定的功能。
6.1 面向对象的基本概念
2.方法 方法(Method)是指为使对象能够实现一定功能而 编写的程序代码。
方法不响应任何事件,与系统的标准函数和用户自 定义函数类似,必须通过程序代Байду номын сангаас人为地进行显式调 用。 方法的调用格式:
[[变量名]=]对象名.方法名() 例如:Thisform.List1.AddItem("中国吉林")
2.以交互命令方式启动表单设计器 【格式】CREATE FORM [<FormName>]
说明:创建的结果将产生扩展名分别为.scx
和.sct的两个文件 。
6.3 利用表单设计器创建表单
6.3.2 启动表单设计器创建表单 1.利用系统菜单或工具栏启动表单设计器
① 选择【文件】菜单下的【新建】命令(或者用 鼠标直接单击工具栏中【新建】按钮),出现 【新建】对话框。 ② 在【文件类型】选项按钮组中选择【表单】单 选按钮,再单击【新建】按钮,即可出现图6-17 所示的【窗体设计器】窗口。
1.使用【快速表单】向导添加控件 实际演示操作步骤。 2.由数据环境直接添加控件 注意:字段类型与控件类型的对应关系。 3.用【窗体控件】工具栏创建控件

VF教程-表单设计

1. 表单设计:请设计一个表单,如图,有三个标签,三个文本框,一个命令按钮。

在前两要求设置下列属性:表单的标题(Caption)、表单运行时自动居中(AutoCenter);三个标签的标题(Caption)、字体大小(FontSize)和粗体(ReadOnly)2. 3. 设计下面的表单。

要求修改:表单标题,表单运行时自动居中;上面的标签的标题、字体大小、字体加粗、并设置其WordWrap 【自动分行】为.t.;下面两个标签的字体、字体大小、字体加粗、字体斜体、自动调整大小、forecolor ;添加两个文本框;命令按钮中标题、字体大小、并添加图片【picture 属性、图片内容自定】。

命令按钮中click 事件的代码为:【直接从这里复制】x=thisform.text1.valuey=thisform.text2.valueif x="abc" and y="123"messagebox("西华大学欢迎您!",0+64,"您好!")elsemessagebox("用户名或密码错误",2+48+256,"错误!")endif4. 按照下面的表单设计一个表单界面:(学生表的显示)注意: 修改每个文本框的controlscource 属性以及使用文本框的生成器!【两种方法都要灵活掌握!】点击上一条,显示上一条的记录,点击下一条,显示下一条的记录【忽略文件指针到文件头和文件末尾的出错】,点击退出,则退出表单。

5. 将上题中的标签和文本框删除。

使用设置数据环境,再从数据环境中的字段拖动到表单中的方法来设置控件:【这种方法简单实用】6. 多表的显示:显示学生表、成绩、课程表中的不同字段:【注意:数据环境中三个表文件建立关联】7. 命令按钮组:将第5题中的三个命令按钮删除,修改为一个命令按钮组,并在命令按钮组的click 事件中添加程序代码,实现相应的操作【使用Do Case 语句】。

vfp表单设计

8.1 基本概念1.名词解释表单:即用户与计算机进行交流的一种屏幕界面,用于数据的显示、输入、修改。

该界面可以自行设计和定义,是一种容器类,可包括多个控件(或称对象)。

表单集:可包含一张或多张表单的容器。

数据环境:在打开或修改一个表单或报表时需要打开的全部表、视图和关系。

它以窗口形式(类似于数据库设计器)反映出与表单有关的表、视图、表之间关系等内容。

可以用数据环境设计器来创建和修改表单的数据环境。

2.表单设计界面主要包括: 表单向导、表单设计器、表单设计器工具栏、表单控件工具栏、属性窗口3.表单设计中常用的属性、事件与方法介绍8.2 创建表单可以用表单向导、表单设计器、表单生成器、编程四种方法创建表单。

1. 利用向导创建表单(1)创建单张表的表单:打开文件菜单→ 新建→ 表单→ 向导[或从常用工具栏上选择表单(F)] → 选择表单向导→ 选取字段→ 选择样式→ 选择排序记录→ 选择保存方式→ 给出合适的文件名和保存位置。

(2)创建多个相关表的表单:打开文件菜单→ 新建→ 表单→ 向导[或从常用工具栏上选择表单(F)] → 选择一对多表单向导→ 选取父表字段→ 选取子表字段→ 选定关系→ 选择样式→ 选择排序记录→ 选择保存方式→ 给出合适的文件名和保存位置。

注意:用向导创建的表单一般含有一组标准的命令按钮。

表单保存后系统会产生两个文件:表单文件:扩展名为 .SCX表单备注:扩展名为.SCT2. 利用表单生成器创建表单文件菜单→ 新建→ 表单→ 新文件→ 表单菜单→ 快速表单命令→ 选择字段和样式并确定之。

注意:用生成器创建的表单不能直接产生一些命令按钮。

3. 利用设计器创建表单文件菜单→ 新建→ 表单→ 新文件→ 在表单设计器中,用表单设计器和表单控件工具条上的按钮创建所需的表单→ 保存表单→ 给出文件名和保存位置。

注意:用设计器创建的表单,用户必须为控件设置有关的属性及事件处理代码。

4. 利用编程的方法创建表单按照面向对象设计的方式,先可视化地利用类来创建表单,再将类代码复制到程序窗口,适当添加部分设置系统环境的代码,以程序文件的形式保存。

第五讲:vfp表单设计


Buttoncount:单选按钮数目
Controlsource:数据来源 Value:当前选中的单选按钮的序号 Caption:按钮上显示的文本
• • • • • • • • •
代码编写: Do case case this.value=1 操作1 case this.value=2 操作2 …… Endcase 其中的this可具情况写成 thisform.optiongroup1.value
endwith
代码窗口
1. “显示”-“代码” 2. 表单设计器中的代码窗口图标 3. 右键单击需编写代码的对象,选择”代码“ 4. 双击需编写代码的对象。
代码窗口组成:对象选择、事件过程选择、代码编写 如对command1的单击(click)事件编辑为 Thisform.release 表示表单运行时单击该命令按钮会释放该表单。
用label控件显示时钟名
为时钟控件的Timer事件编写代 码: bel2.caption=time()
用Label控件显示时间,当发生Timer事 件时,取系统时间并将其设置到该控件 的Caption属性中
插入时钟控件,并将其 Interval属性值置为1000
•页框控件(pageframe1)
常用表单控件
• 表单: (form1)
容器控件,作为其他控件的载体。
常见属性: autocenter,enabled,showwindow,windowtype
• 标签:(label1)用于显示表单中各种说明和提示信息; 标签没有数据源,不能直接编辑。
标签的主要属性包括: caption,autosize,backstyle,backcolor,fontname,fontsi ze,Forecolor等
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

【例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 18AutoSize .T.Label2 Caption 请选择字体:AutoSize .T.FontSize 18Text1 FontBold .T. &&设定为粗体字FontSize 26ForeColor 0,0,255 &&设置文本为蓝色Command1 Caption 关闭注:有关颜色设置RGB函数能返回一种颜色,它的格式为:RGB(nRedValue,nGreenValue,nBlueValue)其中3个参数分别表示颜色中含有红、绿、蓝的成分,范围都是0~255。

在属性窗口可以查看RGB参数。

4. 4.设置选项按钮组Optiongroup1:右击——生成器——在“按钮”选项卡中设置按钮数为4,将表格标题列的4项标题分别设置为:“黑体”、“宋体”、“隶书”、“楷体”;在“布局”选项卡中设置4个按钮的适当间隔。

5. 5.Optiongroup1的Click事件代码:Do caseCase this.value=1thisform.text1.fontname="黑体"case this.value=2thisform.text1.fontname="宋体"case this.value=3thisform.text1.fontname="隶书"case this.value=4thisform.text1.fontname="楷体_GB2312"Endcase6. mand1的Click事件代码:THISFORM.RELEASE注:上述Click事件代码也可以写成:RELEASE THISFORM两种写法的区别在于:THISFORM . RELEASE是调用本表单的RELEASE方法程序,因此,THISFORM后面要加上引用格式中的点号;而RELEASE THISFORM 中的RELEASE是VFP命令,因此,RELEASE后面不需要加上引用格式中的点号。

7.7.保存表单8.8.运行表单【例3】在表单上部设计一个向左移动的字幕(Visual FoxPro 6.0),在下部设计一个数字时钟。

操作步骤如下:1. 1.打开“表单设计器”或“MODIFY FORM……”2. 2.添加两个标签放在合适位置并调整其大小,再添加两个计时器。

(计时器位置任意,在表单执行时见不到计时器)。

3. 3.设置属性:控件名称属性名设置值Form1 Caption 移动字幕和时钟Label1 Caption Visual FoxPro 6.0AutoSize .T.FontSize 18BackStyle 0 &&使之透明Label2 AutoSize .T.FontSize 18Timer1 Interval 200 &&为Label1移动周期Timer2 Interval 1000 &&为Label2刷新周期4. 4.Timer1的Timer事件代码:IF bel1.Left+bel1.Width<0bel1.Left=bel1.WidthELSEbel1.Left=bel1.Left-10ENDIF5. 5.Timer2的Timer事件代码:IF bel2.Caption!=Time()bel2.Caption=Time()ENDIF注:①计时器是一种周期性的按时间间隔自动执行其Timer事件代码的控件,它在应用程序中主要用于处理可能规律的、反复发生的动作。

②在创建计时器时,它的位置可以任意摆放,因为在表单执行时是见不到计时器的,它属于不可见的控件。

③计时器的Interval属性用于设置Timer事件的触发时间间隔,单位为毫秒。

【例4】设计一个密码输入对话框,最多允许输入3次密码。

操作步骤如下:1. 1.打开“表单设计器”或“MODIFY FORM……”2. 2.添加一个标签、一个文本框,及两个命令按钮。

放在合适位置并调整其大小。

3. 3.设置属性:Form1 Caption =DTOC(DATE())&&函数按钮(fx)用于打开表达式生成器,供设置一个表达式,该表达式的值将作为属性值。

对于用表达式设置的属性,在属性值之前会自动插入一个等号(=)。

Label1 Caption password:Text1 PasswordChar *Command1 Caption OKDefault .T. &&按回车键也可以Command2 Caption Cancel4. 4.Form1的Load事件代码:Public II=05. mand1的Click事件代码:i=i+1 &&单击一次Command1就使i加1IF i<=3IF THISFORM.Text1.Value='4321'MESSAGEBOX('Wellcome!') &&在消息框中显示的文本为"Wellcome!"THISFORM.ReleaseELSEMESSAGEBOX('Wrong! Once Again!',3) &&该消息框有3个按钮THISFORM.Text1.Value=''THISFORM.Text1.SetFocus &&调用方法程序SetFocusENDIFELSEMESSAGEBOX('STOP!') &&在消息框中显示的文本为"STOP!"THISFORM.ReleaseENDIF6. mand2的Click事件代码:THISFORM.Release【例5】设计一个有表格的表单,查看学生情况。

操作步骤如下:1. 1.打开“表单设计器”或“MODIFY FORM……”2. 2.添加一个表格和一个命令按钮。

放在合适位置并调整到合适的大小。

3. 3.设置“数据环境”,添入xsda表。

4. 4.设置“表格”的属性:右键单击表格选择“表格生成器”,在“表格生成器”对话框中指定“表格项”、“样式”、“布局”等。

5. 5.“命令按钮”的属性(Caption:退出)、该表单的属性(Caption:学生基本情况表,Autocenter:.T.)6. 6.代码设计:双击“命令按钮”,在“Click”事件过程内键入“RELEASETHISFORM”7.7.保存表单:.SCX文件8.8.运行表单:菜单方法:“程序”→“运行”→注意选定“表单”类型,命令方式:DO FORM……【例6】100到1000之间能被37整除的数操作步骤如下:1. 1.打开“表单设计器”或“MODIFY FORM……”2. 2.添加一个标签、一个编辑框、两个命令按钮。

放在合适位置并调整到合适的大小。

3. 3.设置标签的属性:控件名称属性名设置值Lable1 Caption 100到1000之间能被37整除的数:FontSize 16AutoSize .T.Edit1 FontSize 16Command1 Caption 开始FontSize 12Command2 Caption 关闭FontSize 124. 4.双击“Command1”,在“Click”事件过程内键入:for x=100 to 1000if x%37=0thisform.edit1.value=thisform.edit1.value+str(x,5)+chr(13)endifendfor(注:①以上程序中,chr(13)代表回车符,该行命令代码的功能是每写入一个符合条件的数值,就将编辑框中的文本换一行。

②文本框中的内容可以是文本、数值等多种数据,而编辑框中的内容只能是文本数据。

因此,要用str(x,5)进行转换。

)5. 5.双击“命令按钮2”,在“Click”事件过程内键入“RELEASE THISFORM”6. 6.保存表单:.SCX文件7.7.运行表单:……【例7】设计一个日期与时间表单,只含一个文本框,逐次单击之,即可轮流显示日期或时间。

操作步骤如下:1. 1.在命令窗口执行“MODIFY FORM rqsj”命令;2. 2.从表单控件工具栏中拖入一个文本框,并调整其大小和位置;3. 3.设置各控件属性:控件名称属性名设置值Form1(表单)Caption 日期与时间Text1(文本框)FontSize 28BackStyle 04. 4.编写表单的Load事件代码:PUBLIC i && Load事件在表单装入内存时触发,设置I为公共变量i=.T. && 变量I用于控制轮流显示5. 5.编写文本框的Click事件代码:IF i=.T.Thisform.Text1.Value=DA TE() && 本表单的文本框的值设置为当前日期Thisform.Text1.DateFormat=12 && 日期格式设置为年月日次序Thisform.Text1.DateMark="." && 年月日间隔设置为点号i=.F. && 触发Click事件I值就变反ELSEThisform.Text1.Value=TIME() && 本表单的文本框的值设置为当前时间i=.T. && 触发Click事件I值就变反ENDIF6. 6.保存与运行该表单。

相关文档
最新文档