我想在vb中用程序建立100个label,请高手指点

来源:百度知道 编辑:UC知道 时间:2024/06/21 16:23:51

方法1. 你一个个自己拉, 这是笨办法
方法2.
先建立个label, 然后,把他复制,粘贴下,那么label就变成label(0)
for i =1 to 99
Load Me.Label1(i)
Label1(i).Top = Label1(i - 1).Top + 2 * Label1(0).Height
Label1(i).Caption = "Label1(" & i & ")"
Label1(i).Visible = True
Next
就搞定了

先创建个label1,将他的index属性设为0
在用一个循环
for i=1 to 99
load label1(i)
with label1(i)
......
end with
next

这样,运行时窗体上就有100个label控件了,可以在省略号处添加类似于top,left来改变大小,或其他相关属性