遍歷的例子:
創(chuàng)新互聯(lián)主營五家渠網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營網(wǎng)站建設(shè)方案,重慶APP開發(fā)公司,五家渠h5微信小程序搭建,五家渠網(wǎng)站營銷推廣歡迎五家渠等地區(qū)企業(yè)咨詢
Dim i, j As Integer
For i = 0 To DataGridView1.RowCount - 1
For j = 0 To DataGridView1.ColumnCount - 1
MsgBox(DataGridView1.Item(j, i).Value)
Next
Next
注意:與Excel的單元格命名規(guī)則不一樣,這里的 Item(j, i) 中,列號 j 在前,行號 i 在后。
vb.net已經(jīng)去掉了控件數(shù)組這個類,不過有個代替該方式的一個屬性:tag,你可以把這些關(guān)聯(lián)的tag屬性設(shè)置為同一標(biāo)記,如:a。然后遍歷所有的checkbox并且tag為a的則選定:
protected
sub
chkall_click()
for
each
ctl
as
control
in
me.controls
''如果checkbox在一個容器里,比如groupbox,那可以用groupbox.controls
if
ctl.gettype().name.tolower()
=
"checkbox"
then
ctype(ctl,
checkbox).checked
=
checkbox3.checked
end
if
next
end
sub
For Each ctl As Control In Me.Controls If TryCast(ctl, TextBox) Nothing Then Dim txt As TextBox = TryCast(ctl, TextBox) txt.Text = "" End If