你的程序表单打开的,用完最好记得关闭
就好像,用完东西要放回去,这是个习惯问题。
万一掉电,你在缓存里没来得及存放的东西可能丢失
严重的会使你的表损坏直接打不开了
试试这样:
CLEAR
d=0
DO WHILE d=0
INPUT "请输入三角形的第二个边长:" TO b
INPUT "请输入三角形的第三个边长:" TO c
IF a+b<=c OR a+c<=b OR b+c<=a
WAIT "请重新输入边长,按任意键继续。"
CLEAR
LOOP
ENDIF
p=(a+b+c)/2
s=sqrt(p(p-a)(p-b)(p-c))
d = 1
ENDDO
"三角形面积为:", s
&&将楼上的改了一下,输入stop的时候,注意加引号,如"stop"
clear
DO WHILE T
input "输入N值:" to n
IF VARTYPE(n)="C"
IF UPPER(n)="STOP"
exit
ENDIF
ENDIF
s=0
for i=1 to n
s=s+i
endfor
"1+2+N=",s
ENDDO
RETURN
最后一条
go bottom
Thisform下一条enabled=f &&下一条按钮不可用
Thisform最后一条enabled=f &&最后一条按钮不可用
thisformrefres
退出表单
thisformrelease
clear events
以上就是关于VFP 表单运行结束后涉及的表都要关掉吗全部的内容,包括:VFP 表单运行结束后涉及的表都要关掉吗、VFP程序中用键盘输入三角形的三个边,输入“0”结束。如果边长合理,现实其面积,否则重新输入其边长。、vfp_从键盘中输入N的值,求1+2+…N的和,当从键盘中输入“STOP”后终止该程序的运行等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)