vb.net不定长度数组 vba 数组长度取得

vb.net 不定长字符数组

vb.net已经去掉了控件数组这个类vb.net不定长度数组，不过有个代替该方式vb.net不定长度数组的一个属性：tag，vb.net不定长度数组你可以把这些关联的tag属性设置为同一标记，如：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

相关问答

Q1: vb.net 数组定义和赋值

Dim S As String()

Dim j As Integer = 9

ReDim S(j)

For i = 0 To j

S(i) = i

Next

注: 指定数组上限才能对其赋值

Q2: vB.net语言编写N个数字数组排序可自定义数组长度的

Dim d() As Integer

Dim n As Integer

Dim i As Integer

Dim j As Integer

Dim T As Integer

n = Val(InputBox("请输入n，确定数组的元素个数"))

ReDim d(n)

'用随机函数生成正整数数组

Randomize

For i = 1 To n

d(i) = Int(Rnd * 100 + 1)

Next i

'输出

Print

For i = 1 To n

Print d(i),

Next i

'从小到大排序

For i = 1 To n - 1

For j = i + 1 To n

If d(i) d(j) Then

T = d(i)

d(i) = d(j)

d(j) = T

End If

Next j

Next i

'输出

Print

For i = 1 To n

Print d(i),

Next i

Q3: 怎样在VB.NET中，定义了一个不知大小的一维数组，然后给这个数组添加值

使用动态定义

ReDim a() AS **********'定义一个动态数组

...........

计算出第一个Y

ReDim a(0)

a(0)=Y

.....................

计算出第二个Y

ReDim Preserve a(1) '再次分配元素并保留原有元素

a(1) =Y

.........................

.........................

ReDim Preserve a(N) '第N次分配元素并保留原有元素

a(N) =Y

vb.net不定长度数组的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vba 数组长度取得、vb.net不定长度数组的信息别忘了在本站进行查找喔。