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

yl641305861

is
0 v$ C2 C4 h* c; E        m,n:integer;
& a; g6 x- f. [! X) r' X2 P( r        Name:string;
        obj:object;
5 o% k0 d) E0 K3 p# Wdo
6 L6 `  \" s- i7 @        m:=str_to_num(omit(?.Name,1,5));
        Name:=sprint("Output_Line",m);
# \9 ?! I$ \3 g8 H        obj:=str_to_obj(Name);
7 R# b8 O4 L# a$ f  v  O3 Z$ {        obj.val:=?.StatNumIn;
6 Y6 m) r& D% f# K! j  d2 V: u+ t        if m>1 then
                Name:=sprint("OutRate_Line",m);
                obj:=str_to_obj(Name);
% `9 |: ~- T7 p                obj.val:=n*100/OutPut_Line1;
        end;
end;

dongshui8558

不知道你的问题是什么？问题可能是最后一句吧，整除可能有问题吧。
; [9 K5 D* s+ Q, G/ ?obj.val:=n*100/OutPut_Line1;

笨小孩儿

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

笨小孩儿

求大神指点