请问怎样设置多个非控件数组label的位置？

请问怎样设置多个非控件数组label的位置？例：有三个label，名称分别是Label1,Label2,Label3。现在要将它们的top值全设为30，for i=1 to 3 ........next请问循环里该怎么写？Dim a(2) As LabelDim i As IntegerSet a(0) = Label1Set a(1) = Label2Set a(2) = Label3For i = 0 To 2 a(i).Top = 30Next i楼上ok