RychlejÜφ p°idßnφ polo₧ek do TreeView

Postup:
Ve Visual Basicu je implementovßna snadnß, ale bohu₧el vysoce neoptimalizovanß metoda pro p°idßvßnφ polo₧ek do prvk∙ TreeView nebo Listview. Podφvejte se na nßsledujφcφ cyklus:

For i = 1 To 5000
    TreeView1.Nodes.Add , , , "Node " & i
Next

Te∩ si to trochu zoptimalizujeme. Mφsto abychom se neustßle dotazovali objektu TreeView na jeho kolekci uzl∙, ulo₧φme si je do doΦasnΘ prom∞nnΘ:

Dim nods As MSComctlLib.Nodes
Set nods = TreeView1.Nodes
    
For i = 1 To 5000
    nods.Add , , , "Node " & i
Next

A pokud jeÜt∞ vynechßme doΦasnou prom∞nnou tφm, ₧e pou₧ijeme klauzuli With, tak se dostßvßme k optimalizovanΘ metod∞, kterß b∞₧φ cca o 45% rychleji:

With TreeView1.Nodes
    For i = 1 To 5000
        .Add , , , "Node " & i
    Next
End With

P°esn∞ tuto optimalizaci lze aplikovat nap°φklad na prvek ListView a jeho kolekci.

Zp∞t