Ako zviazať DataSet do DataGridView

DataGridView je ovládací prvok ActiveX , sa často používa v jazyku Visual Basic na základe žiadosti o záväzné a import dát z externej databázy a prezentáciu týchto dát v tabuľkovom formáte , ako je . Pred pripojením kontrolu DataGridView pomocou programovacieho kódu , je nutné umiestniť ovládací prvok do vášho VB formulár ako prvý . Väzba na riadenie DataGridView vyžaduje určité znalosti programovania VB . Potom, čo že ich získali , ako sa to robí trvá len pár jednoduchých krokov a riadkov kódu . Pokyny dovolená 1

Otvorte Visual Basic 6.
2

zvoľte " Štandardné EXE " z nového zoznamu projektov . Teraz sa nachádzate v prostredí Visual Basic 6. programovacie prostredie . Mali by ste mať predvolený hlavného formulára na obrazovke a začať pridávať ovládacie prvky .
3

Kliknite na " projekt " , nasledovaný " komponenty " .
4

Scroll nadol v zozname zložiek a pozrite sa na " Microsoft DataGridView riadenia . " Umiestnite Začiarknite políčko vedľa neho a kliknite na " OK " . To bude umiestniť ovládací prvok DataGridView na váš Ovládacie prvky .
5

Vyberte ovládací prvok DataGridView z panela nástrojov . Pretiahnite ho a umiestnite ho na hlavnom formulári začať používať .
6

Prejsť na hornom menu a kliknite na " Project " a následne na " Pridať modul . " Zadajte alebo skopírujte a vložte nasledujúci kód do modulu :

Private Sub GetData ( ByVal SelectCommand As String )

Skúste

' Zadajte pripojovací reťazec . Vymeňte danú hodnotu s

" platný pripojovací reťazec pre server vzorky Northwind SQL

" databázy prístupné na vašom systéme . ClipArt

Dim ConnectionString As String = _

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

" Initial Catalog = Northwind ; Data Source = localhost "

" Vytvoriť nový adaptér dát na základe zadaný dotaz .

Me.dataAdapter = New SqlDataAdapter ( SelectCommand , ConnectionString )

" Vytvorenie príkazu Builder vytvárať aktualizácie SQL , vložiť , a klipart

" vymazať príkazy na základe SelectCommand . Tie sa používajú na

" aktualizovať databázu .

Dim CommandBuilder As New SqlCommandBuilder ( Me.dataAdapter )

" naplniť novú tabuľku dát a viazať ho na BindingSource .

Dim stôl ako nový DataTable ( )

table.Locale = = Tabuľka

" Zmena veľkosti DataGridView stĺpce , aby zodpovedal novo vloženého obsahu .

Me.dataGridView1.AutoResizeColumns ( _

DataGridViewAutoSizeColumnsMode.AllCellsExceptHeader )

Chytiť ex Ako SQLEXCEPTION

MessageBox.Show ( " Ak chcete spustiť tento príklad , nahraďte hodnotu " + _

" ConnectionString premenné s pripojovací reťazec , ktorý je " + _

" platí pre váš systém . " )

End Try klipart

End Sub

• Predchádzajúca strana: Ako previesť na celé čísla vo VB6 
• Ďalšia strana: Ako čítať iba textové polia vo VB6