Ser capaz de dizer se uma consulta de banco de dados Microsoft Access existe a partir da aplicação Visual Basic.NET pode fazer sua aplicação mais robusta , não levando um erro se a consulta não existe. Em VB, você pode usar a função " CreateObject " para criar uma variável de objeto de nível superior que representa Access. Você pode abrir qualquer banco de dados Access programaticamente usando o objeto e procurar qualquer item no banco de dados , como tabelas ou consultas. Coisas que você precisa
Microsoft Visual Art Studio banco de dados Access
Show Mais instruções
1

Abra o Microsoft Visual Studio. Clique em " New Project" no painel esquerdo da tela do computador, e expandir " Visual Basic" abaixo " modelos instalados". Clique em " Windows" e clique duas vezes em " Console Application " a partir do centro da janela de diálogo para criar um novo projeto de console.
2

Adicione o seguinte código para declarar a variável de objeto do Access ea variável booleana você vai usar para verificar se a consulta existe:

Dim accessAppObj as Object Dim

qryResult as Boolean
3

Crie o objeto e também abrir a banco de dados Access :

accessAppObj = CreateObject (" Access.Application " )

accessAppObj.OpenCurrentDatabase ( "C: \\ Adamastor 2007.accdb " , False)
4

Pesquisa para a consulta "Dados de Cobrança" no banco de dados Northwind. O código a seguir irá retornar "true" se a consulta existe ou "Falso" se não existir :

On Error Resume Next

Dim s As String

s = accessAppObj.CurrentDb.QueryDefs ("Dados de Cobrança" ) . Nome

qryResult = (s < > "")
5

Verifique o resultado e exibir uma mensagem através do janela Console:

Se ( qryResult ) Então

Console.Write ( " consulta existe" )

Else

Console.Write ( " consulta doesn 't existe " ) End If

6

liberar objetos da memória :

accessAppObj.CloseCurrentDatabase ()

accessAppObj.Quit ()

accessAppObj = Nothing

Console.ReadLine ()
7

Pressione " F5" para executar o programa .
< br >