vb.net數(shù)組賦值

Dim x(8, 8)

桂陽(yáng)網(wǎng)站制作公司哪家好，找創(chuàng)新互聯(lián)！從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、APP開(kāi)發(fā)、自適應(yīng)網(wǎng)站建設(shè)等網(wǎng)站項(xiàng)目制作，到程序開(kāi)發(fā)，運(yùn)營(yíng)維護(hù)。創(chuàng)新互聯(lián)從2013年開(kāi)始到現(xiàn)在10年的時(shí)間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來(lái)保證我們的工作的順利進(jìn)行。專(zhuān)注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)。

Dim a As Integer

Dim b As Integer

b = 0

For i = 0 To 8

For j = 0 To 8

If b = 3 Then

b = 1

a = a + 1

Else

b = b + 1

End If

x(i, j) = aNext

Next

vb.net 數(shù)組賦值問(wèn)題

vb.net已經(jīng)去掉了控件數(shù)組這個(gè)類(lèi)，不過(guò)有個(gè)代替該方式的一個(gè)屬性：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在一個(gè)容器里，比如groupbox，那可以用groupbox.controls

if

ctl.gettype().name.tolower()

=

"checkbox"

then

ctype(ctl,

checkbox).checked

=

checkbox3.checked

end

if

next

end

sub

關(guān)于VB.net中定義動(dòng)態(tài)數(shù)組并賦值的問(wèn)題

你在最后兩行之間加一行代碼，看看數(shù)組的規(guī)模大小的結(jié)果；

Msgbox Ubound(cartnum)