Å vite hvordan man skal bruke et datasett for å få tilgang til databasen informasjon kan gjøre programmet mer dynamisk . En datasettet inneholder informasjon fra data som hentes gjennom en datakilde , som deretter åpnes programmatisk . Du kan bruke Microsoft Visual Basic.NET å få tilgang til informasjon i en Access database. VB.NET er et programmeringsspråk som programvare ingeniører bruke til å utvikle web , mobil og desktop-applikasjoner . Du kan også bruke et datasett med andre programmeringsspråk som C # . Instruksjoner
en

start Microsoft Visual Basic Express, og klikk "New Project " på ruten til venstre på skjermen . Klikk på " Visual Basic " nedenfor " Installerte maler , " og klikk "Windows Forms Application ". Klikk "OK".
2

Dobbeltklikk på " Liste- " i " Toolbox" -panelet for å legge til en ny liste box kontroll i skjemaet. Dobbeltklikk på " Button" på " Toolbox" -panelet for å legge til en ny knapp .
3

Dobbeltklikk på " Button1 " for å åpne " Form1.vb " modulen. Skriv inn følgende ovenfor "Public Class Form1 " å erklære namespace : en

Import System.Data.OleDb
4

Skriv inn følgende under " button1_click " å erklære variabler :

Dim oleDBConn Som OleDbConnection

Dim strSQL As String

Dim DOpprett Som datasett
5

Skriv inn følgende for å definere SQL søkestrengen og definere tilkobling til Northwind database:

strSQL = " . velge produkter * fra Products , "

oleDBConn = Ny OleDbConnection _

( " Provider = Microsoft.ACE.OLEDB . 12,0 ; datakilde = C: \\ Northwind 2007.accdb ; " )

Rediger følgende linje med kode , og skriv inn banen og navnet på Access- database:

( " Provider = Microsoft . ACE.OLEDB.12.0 ; datakilde = C: \\ Northwind 2007.accdb ; ")
6

Skriv inn følgende for å gjøre tilkoblingen og for å fylle datasett med data fra produkter tabell:

Dim makeConn Som OleDbConnection = Ny OleDbConnection

Dim dataAptr Som OleDbDataAdapter

dataAptr = Ny OleDbDataAdapter ( strSQL , oleDBConn )

DOpprett = Ny datasettet

dataAptr.Fill ( DOpprett , "Produkter" )
7

Skriv inn følgende for å få tilgang datasettet kolonner og legge til kolonnen informasjon til listen kontroll : en

for hver myRows i dSet.Tables ( " Produkter ") . Rows

Me.ListBox1.Items.Add ( myRows ( " Product Code" ) . toString )

Me.ListBox1.Items.Add ( myRows ( " Produktnavn ") toString )

Neste
8

Skriv inn følgende for å lukke tilkoblingen : .

makeConn.Close ( )
< p > Trykk "F5 " for å kjøre programmet , og klikk " Button1 " for å utføre koden .