VF上机练习2概要.pptVIP

* 在D盘根目录下建立“SHIYAN2”子目录，启动Visual FoxPro，并将其设置为默认目录。 每个表单的字号、颜色、大小自己确定。 设计如图所示表单，文件名为：BD2-1.scx。 “显示”命令按钮的click事件代码如下： x1=10 x2=abc x3={^2012-09-10} x4=.t. x5=$23.5 x6={^2012-09-10 21:25:45} thisform.text1.value=x1 thisform.text2.value=x2 thisform.text3.value=x3 thisform.text4.value=x4 thisform.text5.value=x5 thisform.text6.value=x6 运行表单后单击“显示”按钮，表单如何显示。 【提示】完成本程序，请思考各种类型的常量(N,C,D,L,Y,T)如何表示；如何定义各种类型的变量。 设计如图所示表单，文件名为：BD2-2.scx。 “显示”命令按钮的click事件代码如下： store 5 to x，y，z Thisform .text1.value=x Thisform .text2.value=y Thisform .text3.value=z 运行表单后单击“显示”按钮，表单如何显示。 【提示】完成本程序，思考为变量赋值什么情况下用“=”，什么情况下用store更方便。 教材【例2-1】设计如图所示的表单，文件名为：BD2-3.scx。分别有3个标签、1个命令按钮，其caption属性如图所示；2个文本框，其value属性的初值均为0。在文本框中输入两个数，单击“交换”按钮，交换两个数的位置，如图所示。 教材【例1-3】设计如图所示表单，文件名为：BD2-4.scx。表单运行后，如图所示，单击“欢迎进入”命令按钮后，表单显示如图所示；单击“谢谢使用”命令按钮后， 表单显示如图所示。 设置各控件的属性，其中主要属性如表所示。 欢迎进入 Caption Command1 欢迎使用图书管理系统 Caption Label1 属性值 属性名 对象 属性值 属性名 对象 该按钮的“Click”事件的程序代码： if mand1.caption=欢迎进入 mand1.caption=谢谢使用 thisform.label1.caption=谢谢使用本系统！ else mand1.caption=欢迎进入 thisform.label1.caption=欢迎使用图书管理系统！ endif 设计如图所示表单，文件名为：BD2-5.scx。文本框text1、text2的value属性值为0.0。 “计算”命令按钮的click事件代码如下： a=thisform.text1.value b=thisform.text2.value c=(a^2+b^3)*2/5 thisform.text3.value=c 运行表单后单击“计算”按钮，如图所示。 【提示】完成本程序，请仔细体会什么是算术表达式；并思考要让文本框接受小数，该如何设置。 完成教科书P25【例2-3】 文件名为：BD2-6.scx 设计如图所示表单，文件名为：BD2-7.scx，运行表单后在文本框text1中输入球的半径R，在文本框text2中显示 球的体积V(= )。 【提示】按如下操作提示完成本程序，请思考如何表示球体积的计算公式。 【修改例2-4】设计并运行如图所示的表单，文件名为：BD2-8.scx。体会运算结果。表单分别有1个标签、3个文本框、1个命令按钮，其caption属性如图所示。 “计算”命令按钮的“Click”事件代码 ： A=alltrim(thisform.text1.value) B=thisform.text2.value thisform.text3.value=A$B 文本框默认的值为字符型，alltrim()是一个函数，功能是去掉文本框中前后空格，，不删除串中间的空格 【例2-5】设计并运行如图2-12所示的表单，文件名为：BD2-9.scx。体会运算结果。表单分别有4个标签、2个命令按钮，其caption属性如图2-12所示；2个文本框，其value属性的初值均为空串。 【修改例2-6】设计并运行如图所示的表单，文件名为：BD2-10.scx。体会运算结果。3个文本框，text1、text2可以接收日期型的值。表单form1的load事件代码如下： set century on 将日期的年份值设置成4位显示 set date to ymd 日期的显示为年月日 set mark to - 日期分隔符为“-” *