没有看见"VFP3效果图.bmp"
假设两个正整数在TEXT1和TEXT2中,差运算的结果在TEXT3中。则
(1)"减运算(D)"命令按钮的CLICK过程为:
THISFORM.TEXT3.VALUE=ABS(THISFORM.TEXT1.VALUE-THISFORM.TEXT2.VALUE)
(2)"退出"命令按钮的CLICK过程为:
THISFORM.RELEASE
(3)限制TEXT1和TEXT2的初始值及输入格式,可在FORM1.INIT()过程中输入:
THISFORM.TEXT1.VALUE=1
THISFORM.TEXT2.VALUE=1
THISFORM.TEXT1.INPUTMASK="9999999999" &&根据需要可增减输入的位数
THISFORM.TEXT2.INPUTMASK="9999999999"
(4)另外,还需要编写入下代码
THISFORM.TEXT1.VALID()和THISFORM.TEXT2.VALID()均为
RETURN IIF(THIS.VALUE<=0,.F.,.T.)