Access新手来看：如何更改表窗体报表...得名字

方法1:

只需更改表名，调用ADOX(测试环境为ADOX 2.7)
Function test()
debug . print rename tablename(" b "，" cxcd ")
End Function
Function rename tablename(strold name为String，strNewName为String)为Boolean
On Error Resume Next
Dim TBL为ADOX。表
暗猫为新ADOX。目录
集。active connection = current project。Connection
'上面这句话中的currentproject.Connection应该改为在VB中已经打开的connection对象
，用于cat中的每个tbl。表
如果tbl。Name = strOldName Then tbl。name = str newname
Next
If err . number 0 Then
rename tablename = False
Else
rename tablename = True
End If
End Function

方法2:

请使用DoCmd。重命名“新表名”，acTable，“原始表名”

要完成
，请参考帮助
。以下摘录来自access2000帮助
rename方法
Rename方法在Visual Basic中执行重命名操作。

expression.rename(新名称，对象类型，旧名称)

表达式是必需的。返回DoCmd对象的表达式。

variant类型，必需。一个字符串表达式，表示要重命名的对象的新名称。新名称必须符合Microsoft Access对象的对象命名规则。

类型objecttype AcObjectType，可选。要重命名的对象的类型。

acobjecttype可以是下列AcObjectType常量之一:
acdataaccesspage
AC default default
AC diagram
AC form
AC function
AC macro
AC module
acquiry
AC report
AC server view
acStoredProcedure
acTable

旧名称variant类型，可选。一个字符串表达式，表示由ObjectType参数指定的类型的有效对象名称。如果在类库数据库中执行包含Rename方法的Visual Basic代码，Microsoft Access将首先在类库数据库中搜索具有该名称的对象，然后搜索当前数据库。

描述
有关此操作及其参数如何工作的更多信息，请参考此操作的主题。

如果将ObjectType和OldName参数保留为空(对于ObjectType参数，假设它是默认常量，即acDefault)，Microsoft Access将重命名在“数据库”窗口中选定的对象。若要在“数据库”窗口中选择对象，可以使用SelectObject操作或SelectObject方法，并将“在数据库窗口中”参数设置为Yes (True)。

如果将ObjectType和OldName参数保留为空，则不要在NewName参数后使用逗号。

示例
以下示例重命名Employees表。

docmd.rename“旧雇员表”，acTable，“雇员”[br/]