扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
Dim abc(2) As Integer
宁城网站制作公司哪家好，找创新互联！从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设等网站项目制作，到程序开发，运营维护。创新互联从2013年成立到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联。
abc = {0, 1, 2}
'或者
Dim abcd() As Integer
ReDim abcd(9)
For i As Integer = 0 To abcd.Length - 1
abcd(i) = i
Next
也液码可声歼雹明闹改哪为字符串数组
Dim n, i, j As Integer
'这里你用圆败者的是默认的值,所以N是0,这样枯激,下面的那句话就成了
Dim a(n - 1, n - 1) As Long
'Dim a(0-1,0-1) As Long 也就是 Dim a(-1,-1) As Long
以后橘薯调用的时候肯定会出错
vb点虐 已经去掉了控件数组这个类，不过有个代替该方式的一个属性：tag，你可以睁侍羡把这些关联的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
数组赋值是指针传递,如果想复制数岩歼组就要用一个循环遍历所有元素并赋值.这样改变其中培族一个数组的值才不会影响到另粗中冲外一个数组.
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网