Projemin sol tarafında "treeview" ve sağında "listview" var "treeview" de;

Diğer(Rakamsal)
A
.
.
.
Z 'ye kadar uzayan bir liste var.Database'm ".txt" formatında ve şu şekilde ;

PC*Ahead*Nero*v6.0.0.1
PC*CyberLink*PowerDirector*v2.5.5
PC*LostMarble*Moho*v5.2.1
.
.
.
.
binlerce program listesi... ve bunları aşağıdaki kodlar sayesinde listview'e sorunsuz alıyorum.

'-----------------------------------------------------------
On Error Resume Next
Set fso = New FileSystemObject
Set dno = fso.OpenTextFile("C:\a.txt")
Dim okunansatir, Veriler, BoslukCHR As String
Dim ListeAl As ListItem
BoslukCHR = Text1(0)
Do While Not dno.AtEndOfLine
okunansatir = dno.ReadLine
Veriler = Split(okunansatir, BoslukCHR)(0)
Set ListeAl = Liste.ListItems.Add(, , Veriler)
ListeAl.ListSubItems.Add = Split(okunansatir, BoslukCHR)(1)
ListeAl.ListSubItems.Add = Split(okunansatir, BoslukCHR)(2)
ListeAl.ListSubItems.Add = Split(okunansatir, BoslukCHR)(3)
ListeAl.ListSubItems.Add = Split(okunansatir, BoslukCHR)(4)
ListeAl.ListSubItems.Add = Split(okunansatir, BoslukCHR)(5)
Loop
dno.Close
Set dno = Nothing
Set fso = Nothing
'-----------------------------------------------------------

1.Sorum treeview'den orneğin "L" harfine tıklayınca listview de sadece "L" ile başlayan programlar listelensin.
2.Sorum database'me PC*Ahead*Nero*V1 gibi bir kaydı nasıl "eklerim" yani diğer kayıtların en altına.
3.Sorum Databasem'in boyutu oldukca fazla yani yukarıda verdiğim ornek gibi daha 80-90.000 kayıt var.Bunu
Her program acılışında yukarıdaki kodlar aracılığıyla listview'e cekiyorum ve uzun suruyor bunun daha kısayolu varmıdır?
4.Sorum bir arama formu oluşturacağım ve bu penceredeki textbox'a girilen anahatar butun databasede aranacak ve listviewde
listelenecek.

Bunlar sorular hakkında yardımlarınızı bekliyorum.

Şimdiden Teşekkurler.
Saygılarımla....
__________________