UC知道急!一道VF程序题
来源：百度知道 编辑：UC知道 时间：2024/05/10 09:19:40
我是VFP6.0初学者,下面是我用的方法,怎么不好使呢?
高手帮帮忙啊~
利用带参调用方法计算梯形面积。
Set talk off
Print”输入梯形的上底” to x
Print”输入梯形的上底” to y
Print”输入梯形的高” to z
Do tx with x+y,z,s
?”所求梯形的面积为：”,s
Set talk on
Return
Procepure tx(a,b,c)
C=a*b/2
Endproc
高手帮帮忙啊~
利用带参调用方法计算梯形面积。
Set talk off
Print”输入梯形的上底” to x
Print”输入梯形的上底” to y
Print”输入梯形的高” to z
Do tx with x+y,z,s
?”所求梯形的面积为：”,s
Set talk on
Return
Procepure tx(a,b,c)
C=a*b/2
Endproc
Set talk off
clear
input "输入梯形的上底" to x
input "输入梯形的下底" to y
input "输入梯形的高" to z
Do tx with x,y,z
?"所求梯形的面积为：",z
Set talk on
Return
Procedure tx(a,b,c)
C=(a+b)*c/2
return
ENDPROC
修改成功，运行通过
看来你对vfp语法不是很熟悉哦！
还有问题MMMMMMMMMMMMMMMMMMM我
"C=a*b/2"这里面的C你给定义了吗？？？
你到迅雷上面下这个教程看看不就知道了
您将原程序改为：
Set talk off
input "输入梯形的上底 :" to x
input "输入梯形的上底 :" to y
input "输入梯形的高 :" to z
s=0
Do tx with x+y,z,s
?"所求梯形的面积为：",s
Set talk on
Return
Procedure tx
para a,b,s
s=a*b/2
endproc
保证能通过，（本人在vfp6.0下已经通过，无问题）