adodb 怎么用CurrentDb.TableDefs(i).Name

`ADODB`是ActiveX Data Objects Database的缩写，它是Microsoft ActiveX数据对象技术的一部分，用于访问数据库。`CurrentDb`是一个对象，它是Access数据库应用程序中的一个内置对象，代表当前打开的数据库。

使用`CurrentDb.TableDefs(i).Name`可以在VBA（Visual Basic for Applications，一种编程语言）中获取当前打开的Access数据库中第`i`个表的名称。这里，`TableDefs`集合包含了数据库中所有表的定义，`i`是一个索引值，代表集合中表的位置，从1开始计数。`Name`属性用来获取表的名称。

下面是一个使用`CurrentDb.TableDefs(i).Name`的基本例子：

Dim i As Integer
Dim tableName As String

' 遍历所有表定义
For i = 1 To CurrentDb.TableDefs.Count
    ' 获取每个表的名称
    tableName = CurrentDb.TableDefs(i).Name
    ' 可以在这里进行一些操作，比如打印表名
    Debug.Print tableName
Next i

这段代码会遍历当前打开的Access数据库中的所有表，并在Immediate窗口（在VBA编辑器中的一个窗口，可以通过按Ctrl+G访问）中打印出每个表的名称。