搞定了 不用前移 保持不变 不用那个循环语句就搞定了

IF #PopRight = TRUE THEN

        // 判断队列是否为空

        IF #Queueindex <= 0 THEN

            // Statement section IF

            #erro := TRUE;

            #status := #QueueEmpty;//错误代码输出

            RETURN;

        END_IF;

        #item := #queue[#Queueindex-1]; //最右边的数据移除

        // 所有剩余属于往左移位

        #Queueindex -= 1;

    END_IF;