Dim conn As New ADODB.Connection
Di mrs As New ADODB.Recordset
conn.ConnectionString=“Provider=Microsoft.ACE.OLEDB.12.0;DataSource=” & App.Path & “\词库.accdb”
conn.Open
Set rs.Active Connection=conn
rs.Open “SELECT*FROM words”
n=0
Do While Not rs.EOF
n=n+1
en(n) =rs.Fields(1)
ch(n) =rs.Fields(2)
rs.MoveNext
Loop
rs.Close
conn.Close
下列说法中正确的是( )
①连接的数据库文件名是“\词库.accdb”
②程序运行后,变量n的值表示该数据表中记录的总数
③数组en(n)所存储的是数据表第2个字段的字段值
④“ConnectionString”是conn对象的属性值
⑤查询的数据表名称是“words”
⑥省略语句“rs.MoveNext”,程序也可以正常运行