是否可以将控制数组复制到VB6中的另一个控制数组？

Question

我想将控制数组的内容复制到另一个控制数组，是否可以在VB6中使用？ 请帮忙

Answer 1

您不需要第二个控制数组来保存第一个控件数组的标签中的值，您只需要一个普通的数组。假设您有一个名为myLabel的三个标签的控件数组：

Dim LabelValues(2) as String
Dim i as Integer

Sub DeleteAndSaveLabelValues
    For i = 0 to 2
        With myLabel
            LabelValues(i) = .Caption(i)
            .Caption(i) = ""
        End With
    Next
End Sub

要替换标签值，只需再次遍历控件数组并将Caption设置为适当的数组值。