Veta hur man ska utföra Microsoft Office Access frågor med Visual Basic.NET ( VB.NET ) kan spara tid om du arbetar med en databas . Access är en relationsdatabas management system som ingår i Microsoft Office-paketet . VB.NET är ett objektorienterat dator programmeringsspråk som används för att skapa Windows-program . En redigeringsfråga används för att göra ändringar i en befintlig databas . I några steg du kan skriva VB.NET kod att exekvera action frågor för att skapa och ta bort en tabell i en databas . Saker du behöver
Microsoft Visual Basic Express Review Microsoft Office Access
Visa fler instruktioner
1
Öppna Microsoft Visual Basic Express och klicka på " Nytt projekt ... " i den vänstra rutan på skärmen . Dubbelklicka på " Console Application . " Tryck på " Ctrl " och " A " och tryck sedan på " Delete " för att ta bort den aktuella koden .
2
Kopiera och klistra in följande kod till din " Module1.vb " modul för att köra en fråga och skapa en tabell i Northwind-databasen och sedan köra en annan fråga och radera tabellen som skapades . Northwind-databasen ingår i Microsoft Office-paketet .
Dim myConnToAccess Som
Import System.Data.OleDb
Modul Module1
Sub Main ( ) OleDbConnection
Dim mySQLCommand Som OleDbCommand
Dim mySQLStrg As String
myConnToAccess = Ny OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 , Data Source = C : \\ Northwind 2007.accdb ; " ) katalog
myConnToAccess.Open ( ) katalog
mySQLStrg = " CREATE TABLE tableToDelete ( [ Index ] NUMBER , [ Desc ] TEXT ) , "
mySQLCommand = New OleDbCommand ( mySQLStrg , myConnToAccess ) katalog
mySQLCommand.ExecuteNonQuery ( ) katalog
MsgBox ( " tableToDelete har skapats i din Northwind databasen " ) katalog
mySQLStrg = " DROP TABLE tableToDelete ; "
mySQLCommand = Ny OleDbCommand ( mySQLStrg , myConnToAccess ) katalog
mySQLCommand.ExecuteNonQuery ( ) katalog
MsgBox ( " tableToDelete har raderats " ) katalog
myConnToAccess . Stäng ( ) katalog
End Sub
ändmodul
3
Redigera följande kodrad och skriv in sökvägen till din databas :
OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 , Data
Source = C : \\ Northwind 2007.accdb , " ) .
Tryck " F5 " för att köra programmet
Addera ditt
