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 ... " V ľavej table obrazovky a 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 . Kliknite pravým tlačidlom myši na ovládací prvok " DataGridView " , vyberte " Pridať stĺpec ... " otvorte " Pridať stĺpec " Window
3
zvoľte " DataGridViewCheckBoxColumn " vedľa . " Typ " a kliknite na " Pridať " . Kliknite na tlačidlo " Close " . Práve ste pridali prvý stĺpec obsahovať zaškrtávacie políčka .
4
Double - kliknite na " Button1 " otvorte modul " Form1.vb " . Stlačte tlačidlo " Ctrl " a " , " a potom stlačte tlačidlo " Delete " odstrániť všetky existujúce kód .
5
Skopírujte a vložte nasledujúci kód do vášho " Form1.vb " Lampa pridať dáta do DataGridView sú vybrané kontrolné a zistiť , čo zaškrtávacích políčok . klipart
Public Class Form1 klipart
Private Sub Form1_Load ( byval odosielateľa Ako System.Object , Bývalá e As System.EventArgs ) _
rukoväte MyBase.Load
DataGridView1.ColumnCount = 3
DataGridView1.RowCount = 5
S DataGridView1
. stĺpcov ( 1 ) . Name = " Priezvisko " Columns ( 2 ) . Name =
. " Position "
. Item ( 1 , 0 ) . Value = " Gonzalez "
. Item ( 1 , 1 ) . Value = " Lopez "
. Item ( 1 , 2 ) . Value = " Garza "
. Item ( 1 , 3 ) . Value = " Ramos "
. Položka ( 2 , 0 ) . Value = " Doktor "
. Item ( 2 , 1 ) . Value = " inžinier " klipart
. položku ( 2 , 2 ) . value = " Majstre "
. Item ( 2 , 3 ) . Value = " Správca "
End With
End Sub
Private Sub Button1_Click ( byval odosielateľa Ako systém . Object , byval e ako System.EventArgs ) Kľuky Button1.Click klipart
Dim tmpStr ako reťazec
pre každý riadok ako DataGridViewRow V DataGridView1.Rows
Ak DataGridView1.Rows ( row.Index ) . Cells ( 0 ) . Value = True Then
tmpStr = tmpStr & row.Index & " , "
End If
Ďalšie
Ak tmpStr < > " " Tak
tmpStr = tmpStr.Substring ( 0 , tmpStr.Length - 1 )
MsgBox ( tmpStr & " ! riadky sú kontrolované " )
End If
End Sub End Class
6
Stlačte " F5 " pre spustenie aplikácie , potom stlačte tlačidlo " Button1 " sa zobrazí správa box s riadkami vybrané .