چگونه می توان محتویات یک لیست را کلا به لیست دیگر اعمال کرد ؟

با سلام مجدد

چگونه می توان محتویات یک لیست را کلا به لیست دیگر اعمال کرد ؟ :متفکر:

For i = 0 To List1.ListCount

    List2.AddItem List1.List(i)

Next