pritiskom na command1 kreiram listu naziva text1.text
Dim lst As ListBox
Set lst = Me.Controls.Add("VB.ListBox", Text1.Text, Form1)
lst.Left = 10
lst.Top = 10
lst.Height = 1000
lst.Width = 1000
lst.Visible = True
lst.ZOrder 0
kako da pritiskom na commadn2 dodam text2.text u listu koju sam prethodno kreirao