PowerDesigner 把name写到Comment中 pd7以后版本可用

背景：

最近开发项目的时候需要用到了PowerDesigner，看着数据库设计的字段很不舒服，因为中国人的习惯还是喜欢看中文，所以就做了一下小改动。

首先看改之前的效果：

如何改成我们想要的呢？

看下面一步一步的讲解： 

第一步：双击表就会出现如下界面：我们把Commont字段调出来：

第二步：

第三步：执行如下图代码：

代码如下：   

<span style="font-family:KaiTi_GB2312;font-size:18px;">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 current Model"  
ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then  
MsgBox "The current model is not an Physical Data model."  
Else  
ProcessFolder mdl  
End If  
  
'This routine copy name into code for each table, each column and each view  
'of the current folder  
Private sub ProcessFolder(folder)  
  
Dim Tab 'running table  
for each Tab in folder.tables  
if not tab.isShortcut then  
if len(tab.comment) <> 0 then  
tab.name = tab.comment  
end if  
On Error Resume Next  
Dim col 'running column  
for each col in tab.columns  
if len(col.comment) <>0 then  
col.name =col.comment  
end if  
On Error Resume Next  
next  
end if  
next  
end sub  
</span>

执行结果如图：

因为时间原因这篇博客就写到这里，一般企业中程序员都是这么开发的，但是还是有一些low。以后会持续更新。