如何在vba中以只读方式打开数据库？

我正在尝试使用Excel VBA以只读形式打开access DB

这是我目前掌握的密码

        Set cn = CreateObject("ADODB.Connection")
        cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & DBFullName & ";"

        Set rs = CreateObject("ADODB.Recordset")
        rs.Open "SELECT DISTINCT A_Name FROM app_tbl ORDER BY A_Name ASC", cn, , , adCmdText

如何以只读方式打开它？

试试看

 cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & DBFullName & ";Mode=Read" 

试一试