Als uw Visual Basic-toepassing moet communiceren met SQL Server-databases , moet je weten hoe je SQL strings bouwen om databasegegevens actualiseren of bevragen . Een SQL-tekenreeks is een expressie die een SQL- opdracht wordt gedefinieerd , zoals SELECT , UPDATE of DELETE . U kunt de taak goed te volbrengen met behulp van " SqlCommand " om de database te ondervragen . Wat je nodig hebt SQL Server-database Toon Meer Aanwijzingen Lancering Microsoft VB.NET 1 en klik op " New Project" van het linkervenster van het scherm om te starten de New Project dialoogvenster . Klik op " Windows Forms Application " en klik op "OK " om een nieuw project te starten . Dubbelklik op " Button " 2 naar een nieuwe knop in de Toolbox deelvenster toe te voegen . Dubbelklik op de knop om een nieuwe gebeurtenis click maken voor de knop 3 Voeg de volgende code toe aan uw verbinding variabelen maken: . Dim connetionString als Koord < br Dim verbinding als SqlConnection Dim-commando > Zoals SqlCommand Dim adapter als Nieuwe SqlDataAdapter Dim SQLString als Koord Dim ds Zoals DataSet < br > Goedkope 4 Bouw de SQL-tekenreeks door gebruik te maken van de " SQLString " tekenreeksvariabele : SQLString = SQLString = SQLString & " FROM klanten" < br " * SELECT " > SQLString = SQLString & " bestelling door CustID " 5 Bouw de verbinding string door toevoeging van de volgende code : connetionString = " data Source = ; Initial Catalog = ; gebruikersnaam = , wachtwoord = " verbinding = Nieuw SqlConnection ( connetionString ) 6 Bewerk de tekenreeks in de vorige stap en voer de naam van uw server , database gebruikersnaam en wachtwoord . 7 Voeg de volgende code om de verbinding te openen , ondervraag de database met behulp van de SQL-tekenreeks die u hebt gemaakt en vullen van een database met de resultaten : connection.Open ( ) command = Nieuw SqlCommand ( SQLString , aansluiting ) op Twitter adapter.SelectCommand = commando ds = New DataSet adapter.Fill ( ds ) release object variabelen uit het geheugen 8 door toevoeging van de volgende code : adapter.Dispose ( ) op command.Dispose ( ) connection.Close ( ) Press 9 " F5 " om uw programma uit te voeren en klik op " Button1 . " < br >
|