这样可以么？急！！！

Question

把lbl的index属性设为0for intcount =1 to 3
load lbl(intcount)
lbl(intcount).visible=true
lbl(intcount).caption=intcount
lbl(intcount).top=500+intcount * 300
lbl(intcount).left=100
lbl(intcount).height=270
lbl(intcount).weight=1000
next要先load，再把visible设为true

Answer 1

怎么出现了类型不匹配的问题？
在 load时！？！？！
        Dim intCount As Integer
        
        For intCount = 1 To 3
            Load (lbl(intCount))’这里出现不匹配。
            lblArray(intCount).Visible = True
            lblArray(intCount).Left = intCount * 100 + 100
            lblArray(intCount).Top = 200
            lblArray(intCount).Caption = intCount
        Next
？？？？？？？？？？？

Answer 2

lbl是你的窗体上的一个label控件。
并且lbl的index属性为0
后面不要用lblarray，还是lbl。
load lbl(intcount)  不是  load(lbl(intcount))。

Answer 3

还有，我写错了
是lbl(intcount).Width 不是 lbl(intcount).weight

Answer 4

可以这样(label(0)是已有的):
dim i as ingteger
for i=1  to 3
load label(1)
label(1).Visible = True
label(1).Left = label(0).left
label(1).Top = label(0).top + label(0).height+50
next
你的程序如没有报错,应该是top属性没设置,默认为label(0)的top 和 left.