请大神帮忙看看这段程序。求修改

yl641305861

is
3 T$ ^% `8 A- O. |, X, q        m,n:integer;
5 z3 r  G$ c. X: i: A2 E) M1 m% q# f9 P, V        Name:string;
        obj:object;
: y3 K* v! d1 q/ g$ ?) {3 Kdo
        m:=str_to_num(omit(?.Name,1,5));
        Name:=sprint("Output_Line",m);
        obj:=str_to_obj(Name);
        obj.val:=?.StatNumIn;
8 ?& d4 P% [/ S6 N% g/ C        if m>1 then
                Name:=sprint("OutRate_Line",m);
                obj:=str_to_obj(Name);
; ^& g# w0 C3 B" w2 b                obj.val:=n*100/OutPut_Line1;
* G0 T# k' L+ x$ V; y        end;
end;

dongshui8558

不知道你的问题是什么？问题可能是最后一句吧，整除可能有问题吧。
9 ]1 T9 `! ~$ y. C: c# b& S. oobj.val:=n*100/OutPut_Line1;

笨小孩儿

这是教程实例   不知道怎么就是出错

笨小孩儿

求大神指点