农行纸黄金价格走势图:VFP表单求圆的面积

来源:百度文库 编辑:神马品牌网 时间:2024/04/28 16:30:09
在TEXT1中输入半径,单击“计算”,如果半径大于等于0,则圆面积显示在TEXT2中,如果半径小于0,表单背景变为红色且TEXT2不可用;

已经将TEXT1和TEXT2的INPUTMASK属性设置为9,为什么还提示“操作副/操作类型不匹配 ?"

你要转换类型呀!
val(text.value)

INPUTMASK属性设置为9只能保证输入的是数字,但TEXT1的value属性仍然是文本,所以要转换类型,这样写:
r=val(thisform.text1.value)
thisform.text2.value=3.14*r*r
此外,TEXT2的INPUTMASK属性设置为9是不对的,难道面积只是1位数?

"计算代码"
r=val(thisform.text1.value)
if r>=0
thisform.text2.value=3.14*r*r
else
thisform.text2.enabled=.f.
thisform.backcolor=RGB(255,0,0)
endif
不用设置NPUTMASK属性,难道小数和多位数都不行??