怎么在程序代码部分  定义  使用二维控件数组啊?给个例子好不好?这样对吗?  dim hello(1 to 2,1 to 2) as label但是定义后 怎么使用啊?  比如我要设置每一个LABEL的位置  大小  CAPTION等等

解决方案 »

  1.   

    使用方法:先load hello(i,j),然后hello(i,j).属性,其中i,j为你要访问的控件下标
      

  2.   

    先定义一个文本框text1,index设为0
    Dim TT(2, 2) As TextBox
    Private Sub Form_Load()
            Dim i As Integer
            Dim j As Integer
            Dim count As Integer
            For i = 0 To 2
                For j = 0 To 2
                    count = count + 1
                    Load Text1(count)
                    Set TT(i, j) = Text1(i * 2 + j)
                Next j
            Next i
    End Sub
    以后就可以用了。
      

  3.   

    只要Load一下就可以用了,用好记得马上Unload。二位的空间数组看上去挺吓人的(内存)
      

  4.   

    Dim labels(1 To 8, 1 To 8) As Label
    For countx = 1 To 8
    For county = 1 To 8
    Load labels(countx, county)
    labels(countx, county).Caption = "x"
    Next county
    Next countx为什么编译通不过啊?
      

  5.   

    和一维是差不多。LOAD装载控件,UNLOAD卸载控件!
      

  6.   

    是呀要么动态Load,要么非动态也行,用数组保留数据赋值