Question

VFP表单求圆的面积

在TEXT1中输入半径，单击“计算”，如果半径大于等于0，则圆面积显示在TEXT2中，如果半径小于0，表单背景变为红色且TEXT2不可用；

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

Answer 1

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

Answer 2

"计算代码"
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属性，难道小数和多位数都不行？？

Answer 3

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