VFP笔记

1.计算圆的面积的计算器
r=Thisform.Text1.Value &&将文本框1的值赋给r Thisform.Text2.Value =3.14159*r*r &&将计算结果赋给文本框2Thisform.Release &&释放表单在文本框上单击右键选择“生成器”,将文本框的值设置成数值型。默认是字符型。
也可以用标签来显示计算结果,代码如下r=Thisform.Text1.Value &&将文本框1的值赋给r s=3.14159*r*r Thisform.Label3.Caption = transform(s) &&将计算结果赋给文本框2
2.For i=0 to Thisform.width &&循环控制语句 Thisform.Label1.left=i &&改变标签的左边距 inkey(0.1,'h') &&停留一段时间 Endfor &&循环终端语句 Thisform.Label1.left=100 &&还原标签的位置
阿凡达” 博客,请务必保留此出处http://shamrock.blog.51cto.com/2079212/1359599

相关内容推荐