王第1讲Vfp操作基础.pptVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
王第1讲Vfp操作基础

属性(Attribute)是用来描述对象的各种特征的,不同的对象有不同的属性,而每个对象又都由若干属性来描述。 事件(Event)是一种预先定义好的特定动作,被用户或系统激活,每个对象都可以对事件的动作进行识别和响应。 方法程序是VFP为对象内定的通用过程,能使对象执行一个操作。 2.3.1 实例一:“求圆的面积”表单 1、创建应用程序界面 在VFP系统主窗口点击工具栏上的新建按钮,出现新建对话框,选择表单,再点击新建文件按钮,打开表单设计器,在表单设计器工具栏中点击表单控件工具栏按钮,出现表单控件工具栏,点击上面的标签按钮后,再在表单上点击一下,表单上出现了一个标签label1,用同样的方法在表单上建立两个标签、两个文本框、两个命令按钮。 2.3 VFP应用程序开发 2.3.1 实例一:“求圆的面积”表单 表单控件工具栏按钮 属性窗口按钮 新建按钮 表单控件工具栏 属性窗口 标签 命令按钮 文本框 运行按钮 2.3.1 实例一:“求圆的面积”表单 2.3.1 实例一:“求圆的面积”表单 2、表单中对象的属性设置: 对象 属性名 属性值 Label1 Caption 输入圆的半径 Label2 Caption 圆的面积为 Text1 Value 0 Text2 Value 0 Command1 Caption 计算 Command2 Caption 退出 3、表单中对象的事件代码编写: 双击表单中的命令按钮,即可打开其事件代码窗口,在其中编写某种事件的代码。 “计算”命令按钮Command1的Click事件代码如下: r=Thisform.Text1.Value 将文本框1的值赋给r Thisform.Text2.Value =3.14159*r*r 将计算结果赋给文本框2 “退出”命令按钮Command2的Click事件代码如下: Thisform.Release 释放表单 2.3.1 实例一:“求圆的面积”表单 4、运行程序 点击工具栏上的运行按钮,系统询问是否保存,选择是,出现另存为对话框,选择保存位置(事先建一个自己的学号文件),输入表单名称“求圆的面积”,再点击保存命令按钮,则表单开始运行,在Text1中输入半径后点击表单上的计算按钮,则马上出现计算结果,OK!如有错误,可在表单设计器中进行修改再运行。在资源管理器中,打开学号文件夹,可以看到创建的表单文件“求圆的面积.scx”和“求圆的面积.sct”,前者为表单文件,后者为表单备注文件。 2.3.1 实例一:“求圆的面积”表单 2.3.2 实例一:“运动的标签”表单 1、表单界面 2.3.2 实例一:“运动的标签”表单 2、表单中对象的属性设置: 对象 属性名 属性值 Label1 Caption 欢迎 Label1 FontName 楷体 Label1 FontSize 48 Label1 ForeColor 255,0,0 Label1 AutoSize .T.-真 Command1 Caption 开始移动 Command2 Caption 退出 3、表单中对象的事件代码编写: “开始移动”命令按钮Command1的Click事件代码如下: For i=0 to Thisform.width 循环控制语句 Thisform.Label1.left=i 改变标签的左边距 inkey(0.1,h) 停留一段时间 Endfor 循环终端语句 Thisform.Label1.left=100 还原标签的位置 “退出”命令按钮Command2的Click事件代码如下: Thisform.Release 释放表单 2.3.2 实例一:“运动的标签”表单 inkey命令:输入键测试函数 格式: inkey([等待时间][,字符表达式 ]) 字符表达式: s等待时显示光标 H:等

文档评论(0)

ay8088 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档