Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man sätter in en datamängd i en tabell i Visual Basic

    Veta hur man använder datamängder i Microsoft Visual Basic.NET kan 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 sig och använda . Ett dataset liknar ett bord - du kan lägga till kolumner och rader med data i den och lagra allt i minnet . I några steg du kan skriva VB.NET kod för att lägga till ett dataset till en datatabell . 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 ", tryck sedan 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 , fråga den " TEST_CASE " och infoga innehållet i en datatabell . Koden kommer då att visa innehållet i uppgifterna tabellen .

    Import System.Data.OleDb

    Modul Module1

    Sub Main ( ) katalog

    Dim connString As String = " Provider = Microsoft.Jet.OLEDB.4.0 , Data Source = C : \\ testDatabase.mdb "

    Dim MyConnection som OleDbConnection = Ny OleDbConnection

    Dim da som OleDbDataAdapter

    Dim ds As DataSet

    myConnection.ConnectionString = connString

    da = Ny OleDbDataAdapter ( " SELECT TEST_CASE . * FROM TEST_CASE " , MyConnection ) katalog

    ds = New DataSet

    da.Fill ( ds , " TEST_CASE " ) katalog

    Dim dt Som DataTable = ds.Tables ( " TEST_CASE " ) katalog

    För varje dtRow Som DataRow I dt.Rows

    För varje Col Som DataColumn I dt.Columns

    Console.WriteLine ( dtRow ( col ) ) katalog

    Nästa

    Console.WriteLine ( " " . PadLeft ( 20 , " = " ) ) katalog

    Nästa

    myConnection.Close ( ) katalog

    End Sub

    ändmodul

    3

    Redigera följande kodrad och skriv in 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 programmet .

    Tidigare:

    nästa:
    relaterade artiklar
    ·VBA-programmering Struktur
    ·Hur automatiskt att stänga en röstbrevlåda i VB6
    ·Hur man skapar en mapp med VBA
    ·Hur man följa händelser i VBA
    ·Ställa etiketter eller radnummer i Visual Basic
    ·Fel Inloggning till textfil för en VB.NET Application
    ·Hur man avgör om en tjänst körs i Visual Basic
    ·Hur man installerar FlexGrid kontroll
    ·Lägga VBScript till Excel
    ·ActiveX Control Tutorial
    Utvalda artiklarna
    ·Hur man dödar en förfrågan i ColdFusion
    ·Hur man lär sig SQL-programmering
    ·Hur får man ett attribut i JavaScript
    ·Ljusbord Vs. Lightbox 2
    ·Hur Split en String till bokstäver i Java
    ·Tutorial på OOP & PHP 5 Klasser
    ·Hur man använder flera olikheter i Visual Basic
    ·Hur till Redigera program i Visual Basic
    ·Hur Bifoga en Array i Python
    ·SQL kommandot Ersätt
    Copyright © Dator Kunskap http://www.dator.xyz