Att lära sig att sjunga en fråga med hjälp av Microsoft Visual Basic.NET ( VB.NET ) kan spara tid om du behöver visa data från en databas . En fråga används för att hämta resultat från en databastabell. I några steg du kan ansluta till en databas , skapa en urvalsfråga och visa innehållet i det första fältet genom en datamängd . Saker du behöver
Microsoft Visual Basic Express
Visa fler instruktioner
1
Starta Microsoft Visual Basic Express och klicka på " Nytt projekt ... " i den vänstra rutan på skärmen . Dubbelklicka på " Console Application . " Tryck på " Ctrl " och " A " och tryck sedan på " Delete " för att ta bort befintlig kod .
2
Kopiera och klistra in följande kod till din " Module1.vb " modul . Koden kommer att göra databasen anslutning och fråga en tabell genom en urvalsfråga . De frågeresultat för första fältet kommer att visas i utdata fönstret .
Import System.Data.Odbc.OdbcConnection
Modul Module1
Sub Main ( )
Dim xCntr As Integer
Dim dbConn Som Odbc.OdbcConnection
dbConn = Ny Odbc.OdbcConnection ( " DSN = TRA3 " ) katalog
dbConn.Open ( )
Dim da Som Nya Odbc.OdbcDataAdapter ( " SELECT UNIT_DATA * FROM UNIT_DATA , . " , dbConn ) katalog
Dim ds As New Data.DataSet
da.Fill ( ds )
För xCntr = 0 Till ds.Tables ( 0 ) Rows.Count . - = Nothing
End Sub
ändmodul
3
Redigera följande kodrad och skriv namnet på din DSN .
dbConn = Ny Odbc.OdbcConnection ( " DSN = TRA3 " ) katalog
Redigera följande kodrad och skriv urvalsfrågan du vill köra .
Dim da som Nya Odbc.OdbcDataAdapter ( " SELECT UNIT_DATA * FROM UNIT_DATA , . " , dbConn )
4
Tryck " F5 " för att köra ditt program Addera
.
