新手来看：如何更改表/窗体/报表...得名字
|
问题：
| 如何更改表或者其他数据库对象得名字 |
|---|
方法一：
|
更改表名，调用 __ ADOX __ 即可 __ (测试环境为ADOX2.7)
| Function __ Test()
__ __ __ __ Debug.Print __ renameTableName("b", __ "cxcd")
End __ Function
Function __ renameTableName(strOldName __ As __ String, __ strNewName __ As __ String) __ As __ Boolean
__ __ __ __ On __ Error __ Resume __ Next
__ __ __ __ Dim __ tbl __ As __ ADOX.Table
__ __ __ __ Dim __ cat __ As __ New __ ADOX.Catalog
__ __ __ __ Set __ cat.ActiveConnection __ = __ CurrentProject.Connection
__ __ __ __ '上面这句中 __ CurrentProject.Connection __ 在VB中要更改为已经open的connection对象
__ __ __ __ For __ Each __ tbl __ In __ cat.Tables
__ __ __ __ __ __ __ __ If __ tbl.Name __ = __ strOldName __ Then __ tbl.Name __ = __ strNewName
__ __ __ __ Next
__ __ __ __ If __ Err.number __ <> __ 0 __ Then
__ __ __ __ __ __ __ __ renameTableName __ = __ False
__ __ __ __ Else
__ __ __ __ __ __ __ __ renameTableName __ = __ True
__ __ __ __ End __ If
End __ Function
方法二：
|
请使用 __ | DoCmd.Rename __ "新表名", __ acTable, __ "原表名"
__ 来完成
请多参考帮助
以下摘自access2000帮助
Rename __ 方法
Rename __ 方法在 __ Visual __ Basic __ 中执行 __ Rename __ 操作。
expression.Rename(NewName, __ ObjectType, __ OldName)
expression __ __ __ 必需。返回 __ DoCmd __ 对象的表达式。
NewName __ __ Variant __ 型，必需。字符串表达式，代表要重新命名的对象的新名称。这个新名称必须符合 __ Microsoft __ Access __ 对象的对象命名规则。
ObjectType __ __ AcObjectType，可选。要重命名的对象的类型。
AcObjectType __ 可以是下列 __ AcObjectType __ 常量之一： __
acDataAccessPage __
acDefault __ 默认 __
acDiagram __
acForm __
acFunction __
acMacro __
acModule __
acQuery __
acReport __
acServerView __
acStoredProcedure __
acTable __
OldName __ __ Variant __ 型，可选。字符串表达式，代表由 __ ObjectType __ 参数指定的类型的有效对象名称。如果在某个类库数据库中执行包含 __ Rename __ 方法的 __ Visual __ Basic __ 代码，Microsoft __ Access __ 将首先在该类库数据库中搜索具有该名称的对象，然后再到当前数据库中搜索。
说明
有关该操作及其参数如何工作的详细信息，请参阅该操作的主题。
如果将 __ ObjectType __ 和 __ OldName __ 参数留空（对于 __ ObjectType __ 参数，假设其为默认常量，即 __ acDefault），Microsoft __ Access __ 将重新命名在“数据库”窗口中选择的对象。若要选择“数据库”窗口中的对象，可以使用 __ SelectObject __ 操作或 __ SelectObject __ 方法，并将“在‘数据库’窗口中”参数设为“是”(True)。
如果将 __ ObjectType __ 和 __ OldName __ 参数留空，则在 __ NewName __ 参数后面不要使用逗号。
示例
下面的示例对“Employees”表进行重命名。
DoCmd.Rename __ "Old __ Employees __ Table", __ acTable, __ "Employees"