Visual Basic 2008 ( VB ) er et utviklingsmiljø og språk laget av Microsoft . VB verktøy inkluderer midler til å manipulere databaser , inkludert de som er lagret i Microsoft Access-format . Et viktig skritt i å sette inn data til en Access database formaterer SQL-setning som utfører selve innsatsen. Denne uttalelsen kan formateres og testet i Access. Ved å bruke VB til å lage nye Access-data , kan du lage programmer som kan utføre database operasjoner uten brukermedvirkning. Instruksjoner
en

Open Access , og trykk deretter på "Control -N " for å opprette en ny database . Trykk "Ctrl - S" for å vise " Lagre database " dialogboksen . Skriv " c: \\ games.accdb " for filnavnet , og klikk " Lagre" for å lagre databasen . Dette trinnet oppretter en sample database som du vil bruke for VB data .
2

Klikk på " Create" fanen "Table "-ikonet , og deretter dobbeltklikke den øverste celle i rutenettet som vises. Type " Spillnavn " i cellen .
3

Trykk "Ctrl - S " for å vise en forespørsel til lagre tabellen , skriv " Spill" for tabellen navn.

4

Exit Tilgang og åpen VB. Trykk "Ctrl -N ", etterfulgt ved å klikke på "Windows skjema prosjektet. " Denne handlingen vil opprette et program som viser en bruker input /output skjema du kan tilpasse .
5

Klikk hovedverktøylinjen er " Verktøykasse "-ikonet for å vise paletten inneholder kontrollene du kan dra på standard skjema .
6

Dra en knapp kontroll fra paletten på skjemaet . Høyreklikk på knappen og velg "Properties " og deretter skriver du inn følgende i " Text" raden i "Properties " -panelet : " InsertToDatabase " . Knappen vil vise teksten du skrev .
7

Dobbeltklikk på knappen for å gå inn i koding miljø . Skriv inn følgende uttalelse over " End Sub " statement. Denne uttalelsen vil kalle en annen funksjon som skal utføre database innsetting.

InsertDB ( )
8

Lim inn følgende subrutine etter " End sub ​​" statement. Dette subrutine åpner en forbindelse med databasen du har gjort tidligere , utfører deretter en SQL insert uttalelse om at database -tilkobling.

Private Sub insertDb ( )

Dim strCmd Som OleDbCommand

Dim strSQL As String

Dim DbCmd som ny OleDbCommand

Dim cnxn = Ny OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 ; datakilde = C: \\ \\ Games.accdb ; Vedvarer sikkerhet Info = False ; " )

strSQL =" INSERT INTO Games ( [ Spillnavn ] ) verdier ( 'Bar Wars '); "

strCmd = Ny OleDbCommand ( strSQL , cnxn )

cnxn.Open ( )

DbCmd = Ny OleDbCommand ( strSQL , cnxn )

DbCmd.ExecuteNonQuery ( )

cnxn.Close ( )
< p> End Sub
9

Klikk på "Data" -menyen er " Legg til ny datakilde " element , og klikk deretter på " Reference " i det nye vinduet som dukker opp . VB krever dette og følgende trinn for å finne eksternt program kode som utfører database operasjoner .
10

Klikk på den nye ruten er " Add"-knappen , og klikk deretter elementene " System.Data " og " System. DataSetExtensions "
11

Trykk" F5 "for å kjøre programmet , og klikk deretter på" InsertToDatabase C "-knappen
12

Open, i Access , de . " : \\ Games . accdb "database -filen du lagret .
13

Dobbeltklikk navigasjonsruten er" Game " element for å vise Games tabellen . Den viktigste Access-vinduet vil vise data rad "Bar Wars ", som VB -koden inn.