Visual Basic 2008 ( VB ) är en utvecklingsmiljö och språk gjorts av Microsoft . VB : s verktyg inkluderar sättet för att manipulera databaser, inklusive de som är lagrade i Microsoft Access-format . Ett viktigt steg i att föra in data till en Access-databas formaterar SQL-uttryck som utför själva insatsen . Detta uttalande kan formateras och testas i Access . Genom att använda VB för att skapa nya Access-data kan du skapa program som kan utföra databasåtgärder utan åtgärder från användaren . Instruktioner
1
Open Access , tryck sedan på "Control - N " för att skapa en ny databas . Tryck på " Ctrl- S " för att visa " Spara databas " i dialogrutan . Skriv " c : \\ games.accdb " för filens namn och klicka sedan på " Spara " för att spara databasen . Detta steg skapar ett prov databas som du använder för VB uppgifterna .
2
Klicka på " Skapa " på fliken " Table " -ikonen och sedan dubbelklicka på den översta cellen i rutnätet som visas . Typ " Spelnamn " i cellen .
3
Tryck " Ctrl- S " för att visa prompten för att spara tabellen , skriv " spel " för tabellen namn .
4
Avsluta Access och öppna VB . Tryck " Ctrl- N , " följt av att klicka på " Windows formulär projektet . " Denna åtgärd kommer att skapa ett program som visar en användare input /output formulär du kan skräddarsy .
5
Klicka på verktygsfältet : s " Tool box " -ikonen för att visa paletten innehåller kontroller du kan dra ut på standardformuläret .
6
Dra en knapp från paletten på formuläret . Högerklicka på knappen och välj "Egenskaper " och sedan skriver du följande i " Text " raden i " Egenskaper " rutan : " InsertToDatabase " . Knappen kommer att visa texten du skrivit .
7
Dubbelklicka på knappen för att ange kodning miljön . Skriv följande uttalande ovanför " End Sub " uttalande . Detta uttalande kommer att öppna en annan funktion som kommer att utföra databas insättningen .
InsertDB ( )
8
Klistra in följande subrutinen efter " End Sub " uttalande . Denna subrutin öppnar en anslutning till databasen du gjorde tidigare , då exekverar en SQL INSERT-sats på databasen anslutning .
Private Sub insertDb ( ) katalog
Dim strCmd Som OleDbCommand
Dim strSQL As String
Dim DbCmd Som New OleDbCommand
Dim cnxn = Ny OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 , Data Source = C : \\ \\ Games.accdb ; Persist Security Info = False , " ) katalog
strSQL = " INSERT INTO Spel ( [ gamename] ) värden ( ' Bar Wars ' ) ; "
strCmd = Ny OleDbCommand ( strSQL , cnxn )
cnxn.Open ( ) katalog
DbCmd = Ny OleDbCommand ( strSQL , cnxn ) katalog
DbCmd.ExecuteNonQuery ( ) katalog
cnxn.Close ( ) katalog
End Sub
9
Klicka på " Data " -menyn " Lägg till ny datakälla " objekt och klicka sedan på " Reference " i det nya fönstret som visas . VB kräver detta och följande steg för att hitta den externa programkod som utför databasoperationer .
10
Klicka på den nya rutan "Lägg till " knappen , sedan på de objekt " System.Data " och " System . DataSetExtensions "
11
Tryck " F5 " för att köra programmet , klicka sedan på " InsertToDatabase C " knappen
12
Open , i Access , de . " : \\ Spel . ACCDB " databasfil du sparat .
13
Dubbelklicka navigeringsfönstret s " Game " objekt att visa bordsspel . Den huvudsakliga Access-fönster kommer att visa data som raden " Bar Wars ", som VB-kod infogas .
