VB6 selbe items in ListBoxen in mehreren Forms ein

Hallo liebe VB6 Gemeinde!

Ich hätte mal eine Frage.
Weiss jemand einen Weg, die selbe Liste an Items in Listboxen in mehreren Forms einzutragen?

Danke schonmal im Vorhinein!

Weiss jemand einen Weg, die selbe Liste an Items in Listboxen
in mehreren Forms einzutragen?

Hallo hannes,

mal als Ansatz:

Option Explicit

Private Sub Command1\_Click()
Dim N As Integer
Form2.Show
With Form2
 .List1.Clear
 For N = 0 To Form1.List1.ListCount - 1
 .List1.AddItem Form1.List1.List(N)
 Next N
End With
End Sub

Private Sub Form\_Load()
List1.Clear
List1.AddItem "eins"
List1.AddItem "zwei"
List1.AddItem "drei"
End Sub

Gruß
Reinhard