如何用word vb宏来生成sql

昨天BOSS下了个命令让我用word宏的方式来快速生成sql，这样在我们建表的时候就不用在一条一条元数据的输入。从而提高效率节约成本：

接到命令后就开始着手来做，一边上网搜相关的现成的材料，一边看vb宏的视频教程。终于让我写出了这个程序，虽说有点儿小吧，可是感觉挺好的。

这里的vb宏要针对固定的数据库数据字典表格进行的。
由于代码太长就不拿出来了，这里是word中的表格式和vb运行后的结果如下：

文件名称		T_Test		中文描述		用户信息表
序号	字段名		中文说明	数据类型	长度		缺省	允许空值	主键
1	userid		主键ID	Integer	10				√
2	username		用户名	Varchar	50		Chen
3	password		密码	Varchar	30		我的
4	telephone		用户电话	Varchar	20		112323
5	Address		用户地址	Varchar	50		sss	√
6	Discription		用户介绍	Varchar	200		sssss	√
8	jjjjjj		试试看	varchar	122		333
7	hhhh		试试看撒	Varchar	23		111

复制代码代码如下:
CREATE TABLE T_Test （
userid integer NOT NULL ,
username varchar （50） Default "Chen" NOT NULL ,
password varchar （30） Default "我的" NOT NULL ,
telephone varchar （20） Default "112323" NOT NULL ,
Address varchar （50） Default "sss" ,
Discription varchar （200） Default "sssss" ,
jjjjjj varchar （122） Default "333" NOT NULL ,
hhhh varchar （23） Default "111" NOT NULL
）;
ALTER TABLE T_Test add
CONSTRAINT PK_T_Test PRIMARY KEY（userid）;
comment on table T_Test is "用户信息表";
comment on column T_Test.userid is "主键ID" ;
comment on column T_Test.username is "用户名" ;
comment on column T_Test.password is "密码" ;
comment on column T_Test.telephone is "用户电话" ;
comment on column T_Test.Address is "用户地址" ;
comment on column T_Test.Discription is "用户介绍" ;
comment on column T_Test.jjjjjj is "试试看" ;
comment on column T_Test.hhhh is "试试看撒" ;

在pl/sql中跑了一遍也挺好的，直接就可以执行。