The DataGridView er en ActiveX-kontroll som ofte brukes i Visual Basic - baserte applikasjoner for binding og importere data fra en ekstern database , og deretter presentere disse dataene i et regneark -lignende format. Før du kobler DataGridView kontroll gjennom programmering kode , er det nødvendig å plassere kontrollen på din VB Form først. Bindende DataGridView kontroll krever noe kunnskap om VB programmering. Når det er kjøpt , få det gjort tar bare noen få enkle trinn og linjer med kode. Instruksjoner
en

Åpen Visual Basic 6 .
2

Velg " Standard EXE " fra det nye prosjektet listen. Du er nå i Visual Basic 6 programmering miljø . Du bør ha en standard viktigste formen på skjermen for å begynne å legge til kontroller.
3

Klikk "Project " etterfulgt av " Components ".
4

Scroll nedover listen over komponenter og se etter "Microsoft DataGridView kontroll . " Kryss av i boksen ved siden av den og klikk " OK . " Dette vil plassere DataGridView kontroll på din ToolBox kontroll.
5

Velg DataGridView kontroll fra verktøykassen . Dra og slipp den på din viktigste formen for å begynne å bruke den .
6

Gå til menyen øverst og klikk på "Project " etterfulgt av "Add Module ". Skriv eller kopier og lim inn følgende kode i modulen : en

Private Sub GetData ( ByVal SelectCommand As String )

Prøv

' Angi en tilkobling streng. Erstatt den gitte verdi med en

' gyldig forbindelse streng for en Northwind SQL Server sample

' database tilgjengelig for ditt system .

Dim ConnectionString As String = _

"Integrated Security = SSPI ; Vedvarer Security Info = False ; " + _

"Initial Catalog = Northwind ; datakilde = localhost "

på Opprett en ny data adapter basert på spesifisert spørringen .

Me.dataAdapter = Ny SqlDataAdapter ( SelectCommand , ConnectionString )

"Opprett en kommando byggmester til å generere SQL update , insert, og Selge

' slettekommandoer basert på SelectCommand . Disse brukes til

' oppdatere databasen .

Dim CommandBuilder som ny SqlCommandBuilder ( Me.dataAdapter )

' Befolke et nytt data bord og binde den til BindingSource .

Dim tabell som ny DataTable ( )

table.Locale = = Tabellen

' Resize DataGridView kolonner for å passe den nylig lastet innhold.

Me.dataGridView1.AutoResizeColumns (_

DataGridViewAutoSizeColumnsMode.AllCellsExceptHeader )

Catch ex som SQLException

MessageBox.Show ( "For å kjøre denne eksempel erstatte verdien av " + _

" ConnectionString variabel med en tilkobling streng som er " + _
< p > "gyldig for systemet. ")

End Prøv

End Sub