power designer 显示comment
来源:互联网 发布:补肾的天然保健品 知乎 编辑:程序博客网 时间:2024/05/17 12:04
PD 显示comment
修改自 https://my.oschina.net/liweigov/blog/184386
Option Explicit ValidationMode = True InteractiveMode = im_Batch Dim mdl ' the current model ' get the current active model Set mdl = ActiveModel If (mdl Is Nothing) Then MsgBox "There is no Active Model " ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then MsgBox "The current model is not an Physical Data model. " Else ProcessFolder mdl End If Private sub ProcessFolder(folder) On Error Resume Next Dim Tab 'running table for each Tab in folder.tables if not tab.isShortcut then tab.name = tab.comment Dim col ' running column for each col in tab.columns if col.comment="" then else col.name= col.code+" [ "+col.comment+" ]" end if next end if next Dim view 'running view for each view in folder.Views if not view.isShortcut then view.name = view.code+" [ "+col.comment+" ]" end if next ' go into the sub-packages Dim f ' running folder For Each f In folder.Packages if not f.IsShortcut then ProcessFolder f end if Next end sub
Option Explicit ValidationMode = True InteractiveMode = im_Batch Dim mdl ' the current model ' get the current active model Set mdl = ActiveModel If (mdl Is Nothing) Then MsgBox "There is no Active Model " ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then MsgBox "The current model is not an Physical Data model. " Else ProcessFolder mdl End If Private sub ProcessFolder(folder) On Error Resume Next Dim Tab 'running table for each Tab in folder.tables if not tab.isShortcut then tab.name = tab.comment Dim col ' running column for each col in tab.columns if col.comment="" then else col.name= col.comment end if next end if next Dim view 'running view for each view in folder.Views if not view.isShortcut then view.name = col.comment end if next ' go into the sub-packages Dim f ' running folder For Each f In folder.Packages if not f.IsShortcut then ProcessFolder f end if Next end sub
阅读全文
0 0
- power designer 显示comment
- power designer使Comment与Name相同
- POWER DESIGNER COMMENT CODE 自动填充
- Power Designer.
- Power Designer
- power designer
- power designer
- power designer 表SQL不显示注释问题调整
- Power Designer杂记
- Power Designer杂记
- Power Designer杂记
- Power Designer杂记
- Power Designer 使用笔记
- Power Designer杂记
- Power Designer数据库建模
- Power Designer杂记
- power Designer 使用步骤
- Power Designer使用
- 闭包
- 斗地主随机发牌案例
- 海量数据处理的常用方法
- Java按钮小例子
- Redis与Memcached对比
- power designer 显示comment
- 测试场景及测试素材
- 博客迁移至Hexo,地址http://mrdear.cn
- 网络套接字函数
- Android adb shell 常用命令
- Canvas画布
- 北京信息学培训第三天
- 【C/C++】类中的const成员 static成员
- 读书笔记:《产业阴谋链》