İki farklı textbox'tan, Listbox'a veri girişi

[ycimen]

İki farklı textbox'tan, iki sütunlu bir listbox'a veri giriş yapmaya çalışıyorum ama olmadı. Tersi çok kolay oluyordu halbuki..

 

[Tarkan VURAL]

Listbox veri girişi

http://s3b.directupload.net/images/081018/6apslstw.swf

Linkteki görsel anlatımı izleyiniz.

 

[Orion1]

Ekli dosyayı inceleyiniz.

Private Sub CommandButton1_Click()
ListBox1.AddItem
ListBox1.Column(0, ListBox1.ListCount - 1) = TextBox1.Text
ListBox1.Column(1, ListBox1.ListCount - 1) = TextBox2.Text
End Sub

Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 2
End Sub

 

[ycimen]

Teşekkürler arkadaşlar.