主题：能用语句更改字段长度吗?

比如

Dim cn As new ADODB.Connection()
Dim ca As new ADOX.Catalog

cn.Open(Connections("test").ConnectionString , Nothing, Nothing, -1)
Ca.ActiveConnection = cn

Dim tbl = ca.Tables("test")

'修改表结构和列名

Cn.Execute("alter table test alter column 第二列 varchar(100)")
tbl.Columns("第二列").name = "xxxxx"

cn.Close()
ca = Nothing