碳酸盐 发表于 2006-12-28 21:24
[求助]一个小的语法错误,求教
如图红圈红线所示,run的时候提示有两个语法错误,请强人指点一二,谢谢。[attach]15345[/attach]<BR>
碳酸盐 发表于 2006-12-28 21:25
<FONT color=#ff0000>补充代码如下:</FONT><BR>dec a,b,c,x1,x2,f,delta //声明a,b,c和两个根x1,x2<BR>a=dec(sle_1.text) //a获得输入值<BR>b=dec(sle_2.text) //b获得输入值<BR>c=dec(sle_3.text) //c获得输入值 <BR>delta=b*b - 4*a*c //给delta定义值<BR>f=dec(sqrt(delta))<BR>if delta>=0 then //判断delta值,并计算x1,x2的值<BR> x1=(-b+f)/2*a<BR> x2=(-b - f)/2*a<BR> sle_4.text=string(x1)<BR> sle_5.text=string(x2)<BR>else<BR> messagebox("错误","方程没有实根",question!,ok!)<BR>
wjcayh 发表于 2006-12-28 22:23
<P>是不是缺少end if 语句呀<BR><BR></P>
碳酸盐 发表于 2006-12-29 00:28
<P>非常感谢wjcayh,谢谢你帮助我。<BR><BR>就是缺少了end if 语句了。谢谢。</P>
wjcayh 发表于 2006-12-29 21:23
不用谢谢,互相帮助吗!
chuandong 发表于 2007-1-8 21:47
pb很多问题都是小的地方没有注意啊自己找的要死别人一看就知道了[em03]
notbig 发表于 2007-1-13 00:02
- 号后面没有空格,PB会当做变量不当做运算符
页:
[1]