At være i stand til at fortælle, hvis en Microsoft Access-database query eksisterer fra din Visual Basic.NET program kan gøre din ansøgning mere robust ved ikke at spørge en fejl, hvis forespørgslen ikke eksisterer. I VB, kan du bruge " CreateObject " funktion for at oprette en top-niveau objekt variabel, der repræsenterer Access. Du kan åbne alle Access-database programmering vha. objektet og søge efter et element i databasen, såsom tabeller eller forespørgsler . Ting du skal
Microsoft Visual Studio
Access-database
Vis Flere Instruktioner
1

Launch Microsoft Visual Studio . Klik på " Nyt projekt " fra venstre rude på din computerskærm , og udvide " Visual Basic " under " Installerede skabeloner ". Klik på " Windows" og dobbeltklik på "Console Application " fra midten af dialogvinduet for at oprette en ny konsol -projekt.
2

Føj følgende kode til at erklære Access objektvariablen og booleske variabel du vil bruge til at kontrollere, om forespørgslen eksisterer : Hej

Dim accessAppObj As Object

Dim qryResult Som Boolean
3

Opret objektet og også åbne Access-database : Hej

accessAppObj = CreateObject ( " Access.Application " )

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

Søg efter " Faktura data" forespørgsel i databasen Northwind . Følgende kode vil returnere "Sand ", hvis forespørgslen eksisterer eller " False ", hvis den ikke eksisterer : Hej

On Error Resume Next

Dim s As String

s = accessAppObj.CurrentDb.QueryDefs ( " Faktura data") . Name

qryResult = ( s < > "")
5

Kontroller resultatet og vise en meddelelse gennem Console -vinduet : Hej p Hvis ( qryResult ) Så

Console.Write ( " Query eksisterer " )

Else

Console.Write ( " Query gør 't eksistere " )

End If
6

release objekter fra hukommelsen :

accessAppObj.CloseCurrentDatabase ()

accessAppObj.Quit ()

accessAppObj = Nothing

Console.ReadLine ()
7

Tryk på " F5 " for at køre programmet.
< br >