如何在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