TXT Belgesi İçinden Listbox'a satır satır veri çekmek

[chngrcn]

Forumun değerli üyeleri..

Ekteki çalışmada Userform'daki butona tıklandığında açılan dosyadan seçtiğimiz deneme.txt dosyasındaki veriler satır satır okunarak
listbox1 içine alt alta satır, satır listelenmesi gerekiyor. .


şimdiden teşekkürler..

http://s6.dosya.tc/server6/540wvs/DENEME.rar.html

 

[Necdet]

Merhaba,

kodun tamamını eklemiyorum. sadece ilgili yeri ve kırmızı ile işaretledim.

    Open dosya For Input Access Read As #1
        While Not EOF(1)
            Line Input #1, satir
           [COLOR="Red"] ListBox1.AddItem satir[/COLOR]
 'burası nasıl olacak ? yani listbox1 içine deneme.txt dosyasındaki veriler satır satır gelmesi gerekiyor
  '?????????      ListBox1.AddItem satır
            
            
        sayac = sayac + 1
        Wend
    Close #1
    Application.ScreenUpdating = True

Tabi her satırda tek bir veri yoktur, öyle durumda ne olacak? Sormamışsınız yanıt ta yok