hur du infogar en uppsättning data i en tabell i Visual Basic

Att veta hur man använder dataset i Microsoft Visual Basic. NET kan du spara tid när du arbetar med databaser . VB. NET är ett objektorienterat programmeringsspråk som erbjuds av Microsoft , och det är mycket kraftfull men relativt lätt att lära och använda. Ett dataset liknar ett bord-du kan lägga till kolumner och rader med data i den och förvara den allt i minnet . I några få steg kan du skriva VB. NET kod för att lägga till en uppsättning data till en datatabell
1
Starta Microsoft Visual Basic Express och Klicka på ” Nytt projekt . . . ” i den vänstra rutan på skärmen . Dubbelklicka på ” Console Application . ” Tryck ”Ctrl ”och” A ”och sedan trycka på ” Delete ”för att radera befintlig kod .
2 .

Kopiera och klistra in följande kod på din ” Module1. vb ” modul . Koden kommer att göra en anslutning till en Microsoft Access-databas , en fråga om ” TEST_CASE ” och infoga dess innehåll i en datatabell . Koden kommer då att visa innehållet av tabellen.

Import System. Data. OleDb

Modul Module1

Sub Main ( )

Dim connString As String=” Provider=Microsoft . Jet. OLEDB. 4. 0 , Data Source=C: \ testDatabase. mdb ”

Dim myConnection Som OleDbConnection=Nya OleDbConnection

Dim da Som OleDbDataAdapter

Dim DS som DataSet

myConnection. ConnectionString=connString

da=Nya OleDbDataAdapter ( ” SELECT TEST_CASE . * FRÅN TEST_CASE ” , myConnection )

ds=Nya DataSet

da. Fill ( DS , ” TEST_CASE ” )

Dim dt Som DataTable=ds . Tabeller ( ” TEST_CASE ” )

For Each dtRow Som DataRow I dt. Rows

For Each col Som DataColumn I dt. Columns

Console . WriteLine ( dtRow (COL ) )

Nästa

Console. WriteLine ( ” ” . PadLeft 20 ( , ”=”))

Nästa

myConnection. Close ( )

End Sub

.
ändmodul
3
Redigera följande kodrad och skriv sökvägen till din Access-databas :

Dim connString As String=” Provider=Microsoft . Jet. OLEDB. 4. 0 , Data Source=C: \ testDatabase. mdb ”

Tryck ”F5 ” för att köra program
.

Visited 1 times, 1 visit(s) today

コメント

タイトルとURLをコピーしました