求高手点拨

sunnyzhao

is
        m,n:integer;
6 A% G7 ]0 t5 W$ X" b3 m        Name:string;
        Obj:Object;
do
        m:= str_to_num(omit(?.Name,1,5));
       
        Name:=sprint("Output_Line1",m);
        Obj:=str_to_obj(Name);
4 b, q' f1 P4 f+ L$ h$ w        Obj.val:=?.StatNumIn;
" U! p" C0 @; [        if m>1 then
                Name:=sprint("OutRate_Line",m);
5 |* R) S0 t- J8 e# p' F8 h8 U                Obj:=str_to_obj(Name);
  D. }0 a  x4 L. a7 k) V: l- u                Obj.val:=n*100/OutPut_Line1;
: F6 C: E8 S9 P6 K) {& e0 H3 }5 `' l        end;
/ L/ Q% N8 V" }+ l: h  F4 L& `) nend;
这个编程有错误吗？

老马多拉

抱歉，这是教材的失误，请参见附件《勘误表》

老马多拉

另外注意，这个method是不能单独运行的。

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
" j3 ]+ [: r+ r% i  b另外注意，这个method是不能单独运行的。

谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
2 f0 H4 r7 n: L2 ~) c1 C另外注意，这个method是不能单独运行的。

9 B% m' `! H: |1 J- Z您好，按勘误表改了method，但是还是运行时还是出现了问题。请问这是怎么回事？我刚刚开始学习，关于如何调试也不是很清楚，请多指点~

爱不会累

我也遇到这个问题了