自己搞定了代码如下：

#i := 1;

FOR #i := 1 TO 139

DO

    IF

        "WarinT_1".AlarmT[#i].Q = TRUE

    THEN

        "WarinT_1".AlarmB[#i] := TRUE

    // Statement section IF

    ;

END_IF;

IF

    "WarinT_1".AlarmT[#i].Q =FALSE AND

    "WarinT_1".AlarmB[#i] =TRUE AND

    #"First Scan" =TRUE 

THEN

    "WarinT_1".AlarmB[#i] := FALSE

    // Statement section IF

    ;

END_IF;

IF

    "WarinT_1".AlarmT[#i].Q = FALSE AND

    "WarinT_1".AlarmB[#i] = TRUE AND

    #Reset = TRUE

THEN

    "WarinT_1".AlarmB[#i] := FALSE

    // Statement section IF

    ;

END_IF;

    // Statement section FOR

    ;

END_FOR;