新建一个项目,执行
Dim Builder As New ADOXBuilderBuilder.Open()With Builder.Tables("表A") .RenameColumn("第一列","姓名")End WithBuilder.Close()
如果此列被删除了,再执行,肯定报错