如何编辑VB6集合中的项目

Question

你能告诉我如何编辑VB6集合中的项目吗？ 前任- 我有以下集合 -

Dim OrdLines As New Collection

OrdLines.Add (111)
OrdLines.Add (111)
OrdLines.Add (222)
OrdLines.Add (333)
OrdLines.Add (444)

现在我的要求是编辑第 3 项并想要更改它，比如说“ABC”我该怎么做。

Answer 1

我认为你不能。您必须删除该项目并重新添加修改后的项目。

Answer 2

您可以通过引用检索对象并修改它们：

SomeClass.cls

Option Explicit

Public Value As String

Form1.frm

Option Explicit

Private Sub Form_Load()
    Dim Col As Collection
    Dim SC As SomeClass

    Set Col = New Collection

    Set SC = New SomeClass
    SC.Value = "hello"
    Col.Add SC

    Set SC = New SomeClass
    SC.Value = "world"
    Col.Add SC

    MsgBox Col(2).Value

    Col(2).Value = "cruel word"

    MsgBox Col(2).Value
End Sub