Visual Basic ( VB ) er et programmeringsspråk og utviklingsmiljø produsert av Microsoft. Blant VB verktøy er de for å håndtere data , blant annet uttalelser som utfører database operasjoner som spørringer og bord opprettelse kommandoer . Disse operasjonene fungerer ved å kjøre Structured Query Language ( SQL) kommandoer. Ved hjelp av VB å kjøre SQL-kommandoer er en flertrinns prosess som inkluderer tilkobling til en database og utføre de ønskede SQL kommando. Utfører SQL-setninger fra VB lar deg lage programmer i stand til å håndtere data uten behov for brukermedvirkning . Instruksjoner
en
Åpne Notisblokk og skriv inn følgende tekst i et nytt tekstdokument : " . Gametitle " Denne teksten er overskriften på en kolonne for en enkel database tabellen . Du vil bruke VB til å utføre en SQL-setning på denne tabellen
2
Lagre filen som "C : . \\ Games.txt " .
3
åpen VB og trykk " Ctrl- N ", etterfulgt ved å velge " Windows Form prosjektet. " Denne handlingen skaper et program med en bruker input /output skjema . Du vil tilpasse dette skjemaet og sitt program for å kjøre en SQL- kommandoen på Games database .
4
Trykk " F7 " å gå inn skjemaet utforming vinduet , og klikk deretter verktøylinjen er " verktøykasse " -ikonet for å vise en palett av kontroller ( f.eks knappen , tekstboks ) du kan sette inn på nye skjemaer .
5
dra en tekstboks kontroll fra verktøypaletten på skjemaet , og flytt en knapp kontroll fra . paletten til et sted under tekstboksen
6
Dobbeltklikk på knappen for å åpne vinduet for å legge inn program kode, og deretter skriver du inn følgende linje på toppen av koding vindu :
< p > Import System.Data.OleDb
Denne uttalelsen forteller VB å opprette en kobling til en database -relatert bibliotek av kode når den kjører programmet . Uten denne linken, kan VB ikke gjenkjenne database -relaterte uttalelser i programmet
7
Skriv følgende uttalelse over " End Sub " statement i " button1_click " subrutine : .
< p> RunSQL ( )
Denne uttalelsen kaller subrutine som inneholder SQL-kommandoen når programmets brukeren trykker på knappen du plassert i trinn 5 .
8
Lim inn følgende etter " End sub "statement av" button1_click " subrutine . Dette subrutine skaper en kobling ved hjelp av OleDbConnection kommandoen , med teksten databasen du gjorde i trinn 2 . Subrutinen OldDbCommand uttalelse utfører en SQL- spørring som setter inn et nytt spill navn i databasen. Spillet Navnet kommer fra verdien programmets brukeren skriver inn i tekstboksen du plassert i trinn 5 .
Private Sub RunSQL ( )
Dim SCMD Som OleDbCommand
Dim sSQL som String
Dim DbCmd som ny OleDbCommand
Dim NewValue As String
Dim cnxn = Ny OleDbConnection ( " Provider = Microsoft.Jet.OLEDB.4.0 ; datakilde = c : \\ , utvidet Properties = "" tekst ; HDR = Ja , FMT = Delimited " "; ")
NewValue = TextBox1.Text
sSQL =" INSERT INTO Games ( [ Spillnavn ] ) verdier ( ' "& NewValue &" ') ; "
SCMD = Ny OleDbCommand ( sSQL , cnxn )
cnxn.Open ( )
DbCmd = Ny OleDbCommand ( sSQL , cnxn )
DbCmd.ExecuteNonQuery ( )
cnxn.Close ( )
End Sub
9
Kjør programmet ved å trykke " F5 , " skriv deretter inn et spill navn (f.eks " brikker "," asteroider ") i skjemaets tekstboksen . Trykk på knappen under tekstboksen for å utføre koden du nettopp limte inn
10
Avslutt programmet ved å trykke på "Alt- F4 , " åpne "c : \\ games.txt " . Tekst databasen du gjorde i trinn 2 . Databasen vil vise spillet navnet du har kommet hjem.