Question

vb6.0运行的时候，添加控件数组的时候自动排序！怎么实现？

vb6.0运行的时候，添加控件数组的时候自动排序！怎么实现？
运行的时候！点击添加控件到指定位置！当指定位置多的时候，怎么让它自动排序！？

Answer 1

1、打开VB6.0开发软件，新建一个标准exe工程；2、在设计界面上添加两个Label控件、两个个Text控件和一个Command控件，各控件属性如下图所示；

3、双击Command1控件，进入代码编辑界面，输入如下代码：

123456789101112131415161718192021222324

Private Sub Command1_Click()Dim a(10) As IntegerText1.Text = ""Text2.Text = ""For i = 1 To 10    a(i) = InputBox("请输入第" & i & "个数字")Next iFor i = 1 To 10 Text1.Text = Text1.Text & a(i) & " "Next iFor i = 1 To 10            For j = 1 To 10 - i                If a(j) > a(j + 1) Then                    temp = a(j + 1)                    a(j + 1) = a(j)                    a(j) = temp                End If            Next j        Next i         For i = 1 To 10

追问

我说的是控件数组