1、一维数组的使用

DECLARE
       --创建数组
       TYPE T_USER_VARRAY IS VARRAY(200) OF VARCHAR(50);
       MY_USER_VAR T_USER_VARRAY := T_USER_VARRAY('张三','李四','王五');
BEGIN
       --遍历数组
       FOR I IN 1..MY_USER_VAR.COUNT
       LOOP
           DBMS_OUTPUT.PUT_LINE(MY_USER_VAR(I));
       END LOOP; 
END;

2、二维数组的使用

DECLARE
       --创建数组
       TYPE T_USER_VARRAY IS VARRAY(200) OF VARCHAR2(50);
       TYPE T_USER_INFO_VARRAY IS VARRAY(200) OF T_USER_VARRAY;
       MY_USER_INFO_VAR T_USER_INFO_VARRAY := T_USER_INFO_VARRAY(T_USER_VARRAY('张三','男','研发部'),T_USER_VARRAY('李四','女','人事部'),T_USER_VARRAY('王五','财务部'));
BEGIN
      --遍历数组
      FOR I IN 1..MY_USER_INFO_VAR.COUNT
      LOOP
         DBMS_OUTPUT.PUT('姓名：'||MY_USER_INFO_VAR(I)(1));
         DBMS_OUTPUT.PUT(' 性别：'||MY_USER_INFO_VAR(I)(2));
         DBMS_OUTPUT.PUT_LINE(' 部门：'||MY_USER_INFO_VAR(I)(3));
      END LOOP;
END;