[求助]一个小的语法错误，求教

碳酸盐发布于 2006-12-28 21:24， 822 次点击

如图红圈红线所示，run的时候提示有两个语法错误，请强人指点一二，谢谢。

只有本站会员才能查看附件，请登录

6 回复

碳酸盐2006-12-28 21:25

补充代码如下：
dec a,b,c,x1,x2,f,delta //声明a,b,c和两个根x1，x2
a=dec(sle_1.text) //a获得输入值
b=dec(sle_2.text) //b获得输入值
c=dec(sle_3.text) //c获得输入值
delta=b*b - 4*a*c //给delta定义值
f=dec(sqrt(delta))
if delta>=0 then //判断delta值，并计算x1，x2的值
x1=(-b+f)/2*a
x2=(-b - f)/2*a
sle_4.text=string(x1)
sle_5.text=string(x2)
else
messagebox("错误","方程没有实根",question!,ok!)

wjcayh2006-12-28 22:23

是不是缺少end if 语句呀

碳酸盐2006-12-29 00:28

非常感谢wjcayh，谢谢你帮助我。

就是缺少了end if 语句了。谢谢。

wjcayh2006-12-29 21:23

不用谢谢，互相帮助吗！

chuandong2007-01-08 21:47

pb很多问题都是小的地方没有注意啊自己找的要死别人一看就知道了

notbig2007-01-13 00:02

- 号后面没有空格，PB会当做变量不当做运算符