- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
在图9-8中看到的“表单控件”工具栏窗口是常用“表单控件”工具栏窗口,现在要将前面新建的类添加到表单,可按如下步骤操作: 在“表单控件”工具栏上单击“查看类”按钮,在弹出的快捷菜单中选择“添加”命令,弹出“打开”对话框,将前面建立的类(C:\学籍管理\mytools.vcx)添加到“表单控件”工具栏,操作结果如图9-9所示。 图9-9 类使用示例2 新建的类 将前面建立的类Mydatetime添加到表单中,再在“表单控件”工具栏上单击“查看类”按钮,在弹出的快捷菜单中选择“常用”命令,此时看到的“表单控件”工具栏窗口又是常用“表单控件”工具栏窗口,向表单中添加一个命令按钮,此时表单中就有2个对象了(如图9-10所示):Mydatetime1对象和Command1对象。 图9-10 类使用示例3 编写Command1对象的Click事件的响应代码: thisform.mydatetime1.datetimetype=2 运行表单,用户就可以看到自己定义的类对象了(同时显示日期和时间,如图9-11所示),若单击“Command1”按钮,则只显示时间,如图9-12所示。 图9-11 类使用示例运行结果1 图9-12 类使用示例运行结果2 9.3.3 用编程的方法设计类 在Visual FoxPro中除了用“类设计器”设计类外,还可以用编程的方法设计类,用编程的方法设计类的命令格式: Define Class 类名 As 基类 [[Protected 属性1,属性2…] [属性N=表达式]] [[Hidden 属性1,属性2…] [属性N=表达式]] [Protected][Hidden] Function|Procedure 函数名|过程名 命令/函数组 [EndFunction|EndProcedure] Enddefine 参数说明: Protected:指定属性、过程或函数是保护的。 Hidden:指定属性、过程或函数是隐藏的。 例如,定义一个学生类,不允许从外部改动出生日期“Birthday”属性,只能通过GetBirthday方法来获得学生的出生日期,通过SetBirthday方法来设置学生的出生日期,这个类的定义代码如下: Define Class student As Custom Protected Birthday No=’’ Sname=’’ Sex=.f. Birthday={//} Procedure SetBirthday parameter nVal This.Birthday=nVal EndProc Procedure GetBirthday Return This.Birthday EndProc Enddefine 类定义可以存于程序文件(.PRG)中,程序代码必须放在类定义之前,不能先定义类再写程序代码,例如: 程序文件: 创建一个student类的对象std1 std1=CreateObject(student) std1.no=‘123‘ 给sd1对象的no属性赋值 调用std1对象的SetBirthday方法为std1对象; 的Birthday属性赋值 std1.SetBirthday({^1985.05.12}) 显示std1对象的no和Birthday属性的值 ?std1.no,std1.getbirthday() ? *以下是用编程的方法定义student类 Define Class student As Custom Protected Birthday No= Sname= Sex=.f. Birthday={//} Procedure SetBirthday parameter nVal This.Birthday=nVal EndProc 《VFP基础教程》 清华大学出版社 * 本章教学要求:掌握面向对象程序设计的基本概念,熟习VFP中常用的类,掌握类的设计基本方法。 9.1 面向对象程序设计的基本概念 9.2 Visual FoxPro中的对象和类 9.3 Visual FoxPro类的设计 9.4 对类对象的引用 第九章 Visual FoxPro面向对象的 程序设计 9.1 面向对象程序设计的基本概念 传统的编程方法是面向过程的,面向过程的编程方法要求程序员必须仔细规划程序的流程,即第一步做什么,第二步做什么,最后做什么。面向对象(Object Oriented)的程序设计是以对象为主,主要考虑对象如何创建,如何描述
文档评论(0)