当前位置:编程学习 > VB >>

请问怎么用循环做出按钮组,谢谢~~!!!

请问怎么用循环做出按钮组,在按钮的caption中循环显示出数据,这两个循环怎么做啊,我老是出错,请有经验的前辈帮忙一下,谢谢!~~~
  --------------------编程问答-------------------- 在窗体上放个Command1,并将按钮的Index属性设为0。运行以下代码


Private Sub Form_Load()
    Dim i As Long
    For i = 1 To 10
        Load Command1(i)
        With Command1(i)
            .Caption = "第" & CStr(i) & "个按钮"
            .Move .Left, Command1(i - 1).Top + Command1(i - 1).Height + 10
            .Visible = True
        End With
    Next
End Sub
--------------------编程问答-------------------- 路过.... --------------------编程问答-------------------- 先要在窗口做出按钮数组
做法: 添加按钮,然后copy paste,然后选择是

然后就可以写代码了
Private Sub Form_Load()
    Dim i As Long
    For i = 1 To 10
        Load Command1(i)
        With Command1(i)
            .Caption = "第" & CStr(i) & "个按钮"
            .Move .Left, Command1(i - 1).Top + Command1(i - 1).Height + 10
            .Visible = True
        End With
    Next
End Sub
--------------------编程问答-------------------- 长见识了。 --------------------编程问答-------------------- 楼主说的是动态添加的按钮,还是设计时已确定好的控件数组呀? --------------------编程问答-------------------- 关注
补充:VB ,  控件
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,