VFP表单设计实验报告

《VFP表单设计实验报告》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、佛山科学技术学院实验报告实验名称表单程序设计实验项目使用面向对象程序设计知识设计“计算器”程序专业班级姓名学号指导教师王伟勤成绩日期2009-11-5一、实验目的1．了解面向对象程序设计的基本概念。2．掌握常用对象、属性、事件的使用。3．掌握对象的引用及用代码设置属性的方法。4．掌握普通表单的设计、调试和运行。二、实验内容设计如下图所示的计算器表单程序，并实现要求的功能。要求：（1）可连续进行算术运算；（2）当输入新的数学式时，会自动清除文本框的原有内容；（3）当用户输入的数学式子有误时，可给出相应的提示，并要求重新

2、输入，同时使文本框获得焦点，并将原有内容反选。三、设计步骤及相关按钮代码建立一个CommandGroup，按钮数为16，然后编辑对象，排列按钮和调整按钮的大小，然后在Form的Init行为新增声明和快捷对16个按钮的Caption进行修改：PUBLICTT=""fori=1to9this.commandgroup1.buttons(i).caption=alltrim(str(i))endforthis.commandgroup1.buttons(10).caption="0"this.commandgroup1.b

3、uttons(11).caption="*"this.commandgroup1.buttons(12).caption="+"this.commandgroup1.buttons(13).caption="-"this.commandgroup1.buttons(14).caption="="this.commandgroup1.buttons(15).caption="."this.commandgroup1.buttons(16).caption="/"然后统一在CommandGroup的Click行为部署各按

4、钮相应的行为：docasecasethis.value=1t=t+"1"thisform.text1.value=tcasethis.value=2t=t+"2"thisform.text1.value=tcasethis.value=3t=t+"3"thisform.text1.value=tcasethis.value=4t=t+"4"thisform.text1.value=tcasethis.value=5t=t+"5"thisform.text1.value=tcasethis.value=6t=t+"6"

5、thisform.text1.value=tcasethis.value=7t=t+"7"thisform.text1.value=tcasethis.value=8t=t+"8"thisform.text1.value=tcasethis.value=9t=t+"9"thisform.text1.value=tcasethis.value=10t=t+"0"thisform.text1.value=tcasethis.value=11t=t+"*"thisform.text1.value=tcasethis.val

6、ue=12t=t+'+'thisform.text1.value=tcasethis.value=13t=t+'-'thisform.text1.value=tcasethis.value=14thisform.text1.value=alltrim(str(&t,20,6))casethis.value=15t=t+'.'thisform.text1.value=tcasethis.value=16t=t+'/'thisform.text1.value=tendcasethisform.refresh一、运行结果见

7、程序。二、实验总结（调试分析和体会）