createorreplaceprocedure array_test is TYPE type_arrry ISTABLEOFVARCHAR2(50); --array type_arrry:=type_arrry(null,null); array type_arrry:=type_arrry(); i integer:=0; begin array.extend(10); array(1):="northsnow"; array(2):="塞北的雪"; array(10):="csdn"; dbms_output.put_line("共有数据"|| array.count||"条"); for i in1..array.count loop dbms_output.put_line("array("|| i ||")="|| array(i)); end loop; end array_test; ---------------------------------------------------------------------------------------- --测试: declare begin array_test; end;" ---------------------------------------------------------------------------------------- --结果输出: 共有数据10条 array(1)=northsnow array(2)=塞北的雪 array(3)= array(4)= array(5)= array(6)= array(7)= array(8)= array(9)= array(10)=csdn