Question

用vfp制作编写求1到N之和的表单的程序怎么写

Answer 1

新建一表单FORM1,再FORM1里添加3个文本框和一个按钮。
TEXT1用于输入1，TEXT2用于输贺银宴入N的具体值比如你将输入59.
COMMAND1.CLICK事件：
IF LEN(ALLTRIM(THISFORM.TEXT1.VALUE))=0 OR LEN(ALLTRIM(THISFORM.TEXT2.VALUE))=0
=MESSAGEBOX("缺禅银少运算参数"，0）搏坦
ELSE
S=0
A=VAL(ALLTRIM(THISFORM.TEXT1.VALUE))
B=VAL(ALLTRIM(THISFORM.TEXT2.VALUE))
FOR I=A TO B
S=S+I
ENDFOR
THISFORM.TEXT3.VALUE=S
ENDIF
THISFORM.REFRESH