eXontrol Software - ExplorerTree ActiveX, NET Control

Use the NextVisibleItem property to access the visible items. The NextVisibleItem property retrieves 0 if there are no more visible items. Use the IsItemVisible property to check whether an item fits the control's client area.

The following sample enumerates the visible items:

Private Sub VisItems(ByVal g As EXPLORERTREELibCtl.Group)
    Dim h As HITEM
    With g.Items
        h = .FirstVisibleItem
        While Not (h = 0)
            Debug.Print .CellCaption(h, 0)
            h = .NextVisibleItem(h)
        Wend
    End With
End Sub

Send comments on this topic.

		Type	Description
		Item as HITEM	A long expression that indicates the item's handle.
		HITEM	A long expression that indicates the handle of the next visible item.