Visual Basic ( VB ) is een programmeertaal en ontwikkelomgeving geproduceerd door Microsoft . Onder gereedschappen VB 's zijn die voor het beheer van gegevens , met inbegrip van verklaringen uitvoeren van database- operaties zoals query's en tafel creatie opdrachten . Deze operaties werken door het uitvoeren van Structured Query Language ( SQL ) -opdrachten . Met behulp van VB naar SQL commando's is een proces van meerdere stappen dat omvat een verbinding met een database en het uitvoeren van de gewenste SQL-opdracht . Uitvoeren van SQL- statements uit VB kunt u programma's die het beheer van gegevens, zonder de noodzaak van tussenkomst van de gebruiker te creëren . Instructies Open Notepad 1 en typ de volgende tekst in een nieuw tekstdocument : " . GameTitle " Deze tekst is de titel van een kolom voor een eenvoudige database tabel . U zult VB gebruiken om een SQL-instructie op deze tafel voeren kopen van 2 Sla het bestand op als " C : . \\ Games.txt " . 3 Open VB en druk op "Control - N , " gevolgd door " Windows Form -project . " Deze actie zorgt voor een programma met een user input /output vorm . Je vindt dit formulier en het programma om een SQL-opdracht uitvoeren op de Spelen databank aan te passen . Druk op " F7 " 4 in het ontwerp venster vorm in te voeren , klik op " gereedschapskist " icoon van de werkbalk te weer een palet van controles ( bv. de knop , tekstvak ) u kunt invoegen op het blanco formulier . 5 Sleep een tekstvak van het gereedschapspalet op het formulier , sleep vervolgens een knop controle van de . palet aan elke plaats onder het tekstvak 6 Dubbelklik op de knop om het venster te voeren voor het invoeren van programmacode , typ de volgende regel aan de bovenkant van de codering venster : Invoer System.Data.OleDb Deze verklaring vertelt VB om een link naar een database - gerelateerde bibliotheek van code maken wanneer het uw programma draait . Zonder deze verbinding , kan VB niet herkennen van de database - gerelateerde uitspraken in uw programma Type 7 de volgende verklaring boven de " End Sub " verklaring in de " Button1_Click " subroutine : . RunSQL ( ) op Deze verklaring roept de subroutine met uw SQL- commando wanneer het programma gebruiker op de knop die u geplaatst in stap 5 . 8 Plak volgende na de "End sub " verklaring van de " Button1_Click " subroutine . Deze subroutine zorgt voor een koppeling , met behulp van de OleDbConnection commando , met de tekst -database die u hebt gemaakt in stap 2 . De subroutine OldDbCommand statement voert een SQL- query die voegt een nieuw spel naam in de database . Het spel naam komt van de waarde gebruiker typt het programma in het tekstvak u geplaatst in stap 5 . Private Sub RunSQL ( ) Dim SCMD Zoals OleDbCommand Dim sSQL As String Dim DbCmd als Nieuwe OleDbCommand Dim newValue als Koord Dim cnxn = Nieuw OleDbConnection ( " Provider = Microsoft.Jet.OLEDB.4.0 ; data Source = c : \\ ; Uitgebreide eigenschappen = " " tekst ; HDR = Ja ; FMT = Delimited " " ; " ) = TextBox1.Text sSQL = newValue " INSERT INTO Games ( [ GameName ] ) waarden ( ' " & newValue & " ' ) ; " SCMD = Nieuw OleDbCommand ( sSQL , cnxn ) cnxn.Open ( ) op DbCmd = Nieuw OleDbCommand ( sSQL , cnxn ) DbCmd.ExecuteNonQuery ( ) op cnxn.Close ( ) op End Sub 9 Start het programma door op " F5 , " typ vervolgens elke spelnaam ( bijv." checkers , " " asteroïden " ) in tekstvak van het formulier . Druk op de knop onder het tekstvak om de code die u zojuist geplakt uitvoeren End 10 het programma door op ' Alt - F4 , " open vervolgens de " c: \\ games.txt " . Tekstdatabase u in stap 2 . De databank zal de naam spel u zojuist heeft ingevoerd weer te geven .
|