excel表定义导入powdesiger
excel格式:表名汉语 table_code列名 column_name NVARCHAR2(10)Option ExplicitDim mdl ' the current modelSet mdl = ActiveModelIf (mdl Is Nothing) Then MsgBox "There is no Active Model"End ...