比如你要修改id长度是52 declare v_sql varchar2(1000); cursor cr is select table_name from user_tab_columns where column_name = 'ID'; begin for r in cr loop v_sql := 'alter table '||r.table_name||' modify ID VARCHAR2(52)'; execute immediate v_sql; end loop; end;