Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Spustite program Microsoft Visual Basic Express . Kliknite na tlačidlo " Nový projekt ... " na ľavom paneli obrazovky . Vyberte " Windows Forms . " Kliknite na tlačidlo " OK " . 
 2 
 Double - kliknite na " tlačidlo " na " Toolbox " paneli pridať nový ovládací prvok tlačidla . Double - kliknite na " DataGridView " pre pridanie nového ovládacieho prvku mriežky . . Double - kliknite na " Button1 " otvorte modul " Form1.vb " 
 3 
 Zadajte nasledujúce vyhlásiť pripojovací reťazec : 
 
 Dim oleString As String 
 
 oleString = " Provider = microsoft.jet.oledb.4.0 ; " 
 
 oleString = oleString a " Data Source = C : \\ ; Extended Properties = " " Text " ; 
 
 oleString = oleString & " HDR = No , FMT = čiarkou " " " 
 4 
 Zadajte nasledujúce deklarovať viac premenných pripojenie a dotaz na súbor dát : 
 
 Dim conn ako nové OleDbConnection ( oleString ) 
 
 Dim da As New OleDbDataAdapter ( ) 
 
 Dim ds ako New DataSet ( ) 
 
 Dim oldeComm ako nový OleDbCommand ( " SELECT * FROM C : \\ CSVdata . csv " , prip ) 
 
 Upraviť nasledujúci riadok kódu a zadajte cestu k vášmu súboru : 
 
 Dim oldeComm As New OleDbCommand ( " SELECT * FROM C : \\ CSVdata.csv " , conn ) 
 5 
 Zadajte nasledujúci súbor otvoriť a získať dáta pomocou súboru dát : 
 
 conn.Open ( ) 
 
 da.SelectCommand = oldeComm 
 
 ds.Clear ( ) 
 
 da.Fill ( ds , " CSV " ) 
 6 
 Zadajte nasledujúce pridať dáta do ovládacieho prvku dát Grid View : 
 
 DataGridView1.DataSource = ds.Tables ( " CSV " ) 
 7 
 Zadajte nasledujúce zmenu farby kontroly dát Grid View : 
 
 s DataGridView1 . ColumnHeadersDefaultCellStyle 
 
 . BackColor = Color.Navy 
 
 . ForeColor = Color.White 
 
 . Font = New Font ( DataGridView1.Font , FontStyle.Bold ) 
 
 End With 
 
 DataGridView1.GridColor = Color.Red 
 
 S Me.DataGridView1.Rows 
 
 . bodu ( 0 ) . Cells ( 1 ) . Style.BackColor = Color.DarkGreen 
 
 . Item ( 0 ) . Cells ( 1 ) . Style.ForeColor = Color.White 
 
 . bod ( 1 ) . Cells ( 1 ) . Style.BackColor = farba . red 
 
 . Item ( 1 ) . Cells ( 1 ) . Style.ForeColor = Color.White 
 
 End With 
 
 Conn.Close ( ) 
 8 
 Stlačte " F5 " spustiť program a kliknite na tlačidlo " Button1 . "