Ser capaz de saber si existe una consulta de base de datos Microsoft Access desde la aplicación de Visual Basic.NET puede hacer su aplicación más robusta al no provocó un error si la consulta no existe . En Visual Basic , puede utilizar la función " CreateObject " para crear una variable de objeto de nivel superior que representa el acceso . Usted puede abrir cualquier base de datos Access mediante programación con el objeto y la búsqueda de cualquier elemento de la base de datos, como tablas o consultas. Cosas que necesitará
Microsoft Visual Estudio en base de datos Access
Ver Más instrucciones
1

lanzamiento Microsoft Visual Studio . Haga clic en " Nuevo proyecto " en el panel izquierdo de la pantalla del ordenador , y ampliar a continuación " Visual Basic" " Plantillas instaladas ". Haga clic en " Windows" y haga doble clic en " Aplicación de consola " en el centro de la ventana de diálogo para crear un nuevo proyecto de consola .
2

Agregue el código siguiente para declarar la variable de objeto de Access y la variable booleana que va a utilizar para comprobar si existe la consulta:

accessAppObj Dim As Object Dim

qryResult As Boolean
3

Cree el objeto y abra el base de datos Access :

accessAppObj = CreateObject ( " Access.Application " )

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

Búsqueda de la consulta " datos factura" en la base de datos Northwind. El siguiente código devuelve " true" si existe la consulta o "Falso " si no existe:

On Error Resume Next

Dim s As String

s = accessAppObj.CurrentDb.QueryDefs ( "Datos factura ") . Nombre

qryResult = ( s < > "" )
5

comprobar el resultado y mostrar un mensaje a través de la ventana de la consola :

Si ( qryResult ) Entonces

Console.Write ( "La consulta no existe" )

demás

Console.Write ( " Query doesn ' t existe " )

End If
6

soltar objetos de la memoria :

accessAppObj.CloseCurrentDatabase ()

accessAppObj.Quit ()

accessAppObj = Nothing

Console.ReadLine ()
7

Press "F5 " para ejecutar el programa.
< br >