مساعدة في ListView

إعضاء المنتدى

السلام عليكم ورحمة الله وبركاته

عندي TreeView  و   ListView1 وقمت بتعبئتهم من قاعدة البيانات بنجاح  ListView1  بها قائمة عبارة عن قيمة التاج  ل Treeview  ووضعت كود يقوم بالبحث عن نود بمعلومية التاج ويظهرها في Listview2 

وإليكم الكود

Private Sub FindByTag()
Dim nodes As TreeNodeCollection = treeView1.Nodes
Dim n As TreeNode
For Each n In nodes
FindRecursiveTag(n)
Next
End Sub

Private Sub FindRecursiveTag(ByVal tNode As TreeNode)

Dim tn As TreeNode
For Each tn In tNode.Nodes
If tn.Tag.ToString() = ListBox1.Text Then
ListBox2.Items.Add(tn.FullPath)
End If
FindRecursiveTag(tn)
Next
End Sub

ولستدعاء الدالة اكتب تحت المفتاح

FindByTag()

المطلوب محتاج كود عباره عن حلقة تكرار على ListView1  وكل عنصر نعمل عليه الإجراء الآتي بعد البحث والعثور عليه في الشجرة يقوم بإحضار المسار الكامل على شكل قائمة وليس سلسلة نصية طويلة يتم تعبئتها في ListView2  الكود السابق يقوم بإحضار المسار الكامل على شكل سطر وأنا محتاجه على شكل قائمة

هل يمكن ذلك عمليا أم أن السؤال غير منطقي أرجوا المساعدة

معذرة ممكن تكون أسئلتي كتيرة ولكن بصراحة ببحث ومش بجد ما أريده بالظبط أو لا يعمل معي ما أجده بشكل سليم