不可以
============================
表名都可以更改,為何標題不行?
Dim Builder As New ADOXBuilderBuilder.Open()With Builder.Tables("表A") .Rename("订单")End WithBuilder.Close()