Partilhar via


Objeto AllQueries (Access)

A coleção AllQueries contém um AccessObject para cada consulta no objeto CurrentData ou CodeData.

Comentários

O objeto CurrentData ou CodeData tem uma coleção AllQueries contendo objetos AccessObject que descrevem instâncias de todas as consultas especificadas pelo objeto CurrentData ou CodeData. Por exemplo, você pode enumerar a coleção AllQueries no Visual Basic para definir ou retornar os valores das propriedades dos objetos AccessObject individuais na coleção.

Consulte um objeto AccessObject individual na coleção AllQueries , referindo-se ao objeto pelo nome ou referindo-se ao seu índice dentro da coleção. Se você deseja fazer referência a um objeto específico na coleção AllQueries, é melhor referir-se à consulta pelo nome, porque o índice da coleção de uma consulta pode ser alterado.

A coleção AllQueries é indexada começando com zero. Se você fizer referência a uma consulta pelo índice, a primeira consulta é AllQueries(0), a segunda consulta será AllQueries (1) e assim por diante.

Observação

Para listar todas as consultas abertas no banco de dados, use a propriedade IsLoaded de cada objeto AccessObject na coleção AllQueries . Em seguida, você pode usar a propriedade Name de cada objeto AccessObject individual para retornar o nome de uma consulta.

Não é possível adicionar nem excluir um objeto AccessObject da coleção AllQueries.

Exemplo

O exemplo a seguir imprime o nome de cada objeto AccessObject aberto na coleção AllQueries.

Sub AllQueries() 
    Dim obj As AccessObject, dbs As Object 
    Set dbs = Application.CurrentData 
    ' Search for open AccessObject objects in AllQueries collection. 
    For Each obj In dbs.AllQueries 
        If obj.IsLoaded = True Then 
            ' Print name of obj. 
            Debug.Print obj.Name 
        End If 
    Next obj 
End Sub

Propriedades

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.