#sc := 0;

FOR #s := 0 TO 99 DO

    IF "数据块_2".sz[#s] = #zf THEN

        #sc := #s;// Statement section IF

        EXIT;

    END_IF;// Statement section FOR

END_FOR;

IF (#sc = 0)&("数据块_2".sz[0] <> #zf) THEN

    #s := 0;

        REPEAT

            #s := #s + 1;// Statement section REPEAT

        UNTIL "数据块_2".sz[#s] = '' END_REPEAT;// Statement section IF

    #sc := #s;

    "数据块_2".sz[#s] := #zf;

END_IF;// Statement section ELSE

这是中间有空数组的情况，没用过scl，不知道语法对不对，你可以看看这个for和repeat指令