一维数组示例如下:

-- Created on 2014-5-15 by ADMINISTRATORDECLARE    TYPE Arr1 IS VARRAY(10) OF NUMBER;    Tab_1 Arr1;    TYPE Arr2 IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;    Tab_2 Arr2;BEGIN    -- Test statements here    Tab_1 := Arr1(1, 3, 4, 6, 3, 2, 8, 5);    FOR a IN 1 .. Tab_1.Count LOOP        Dbms_Output.Put_Line(' ' || Tab_1(a));    END LOOP;    Tab_2(1) := 101;    Tab_2(2) := 102;    Tab_2(3) := 103;    Tab_2(4) := 104;    FOR b IN 1 .. Tab_2.Count LOOP        Dbms_Output.Put_Line(' ' || Tab_2(b));    END LOOP;END;

结果:

13463285101102103104

二维数组示例:

-- Created on 2014-5-15 by ADMINISTRATORDECLARE    -- Local variables here    TYPE Array1 IS VARRAY(10) OF NUMBER;    TYPE Array2 IS VARRAY(10) OF Array1;    Arr Array2;BEGIN    Arr := Array2(Array1(11, 12, 13, 14, 15), Array1(21, 22, 23, 24, 25));    FOR i IN 1 .. Arr.Count LOOP        FOR j IN 1 .. Arr(i).Count LOOP            Dbms_Output.Put_Line(Arr(i) (j));        END LOOP;    END LOOP;END;

结果:

11121314152122232425