使用VB SCRIPT给power designer 所有表或者实体增加列。省时间，省心，准确度高。

本文主要是介绍使用VB SCRIPT给power designer 所有表或者实体增加列。省时间，省心，准确度高。，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

做设计的童鞋们，有时候会遇到给数百个表统一加字段的，或者是修改某些列的情况。纯手工累个半死，还容易遗漏和犯错。研究了power designer 的脚本后，发现及其简单，你要做的就是打开PD, 按ctrl+shift+x键，弹出窗里粘贴下面的代码运行即可，记得修改为你的需求。这种方法节省90%的时间。


下面第一个代码是增加列的，第二个是修改数据列的属性的。可以修改列的名称，编码，类型，等等。如果其他的需要参考，课打开PD的帮助，找meta model那个帮助项查看它的API,尽管那个API开起来很烦人。


下面的代码在power designer 14上测试通过。


 '演示用vb script给PD统一增加列的


Option Explicit   
Dim mdl ' the current model     
Set mdl = ActiveModel  
Dim Tab 'running table 
Dim col_ModTime, col_ModPerson ,col_CreatPersion,col_CreatTime
' 定义属性变量  
for each Tab in mdl.Tables  
if not tab.isShortcut then 
 Set col_ModTime = Tab.Columns.CreateNew
 set col_ModPerson = Tab.Columns.CreateNew 
 set col_CreatPersion=Tab.Columns.CreateNew 

这篇关于使用VB SCRIPT给power designer 所有表或者实体增加列。省时间，省心，准确度高。的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---