Imports System.Diagnostics
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinExplorerBar
Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button14.Click
' Display the size and number of elements in the control's main UIElement.
Dim messageText As String = "The size of the control's main element is: {0}, and it contains {1} element(s)"
Dim messageTextFormatted As String = String.Format(messageText, Me.ultraExplorerBar1.UIElement.Rect.Size.ToString(), _
Me.ultraExplorerBar1.UIElement.ChildElements.Count)
Debug.WriteLine(messageTextFormatted)
End Sub