作者SmallBeeWayn (喵喵叫的蜜蜂猫)
看板Visual_Basic
标题Re: [VB6 ] 自动产生控制项
时间Tue Dec 19 14:09:34 2006
※ 引述《redhon ( redhon)》之铭言：
: VB 6.0 有办法 自动产生控制项 吗 ??
: 例如
: 按一下 Command1
: 结果产生 ５个 Label
: 谢谢
先在Form上拉一个Command Name=Command1
以及一个Label, Name=Label, Index=0
使用如下程式码
Private Sub Command1_Click()
Dim n As Long
For n = 1 To 5
Load Label(n)
Label(n).Top = Label(n - 1).Top + 200
Label(n).Caption = "Label" & n
Label(n).Visible = True
Next n
Command1.Enabled = False
End Sub
或请参阅MSDN 「在执行阶段新增控制项阵列」 一节
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.115.204.46
1F：→ redhon:还是不行耶！没任何反应？？ 12/20 09:21
2F：推 fumizuki:你确定有照步骤做？ 12/20 20:35