Imports System.Diagnostics
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinExplorerBar
Private Sub Button51_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button51.Click
If (Me.ultraExplorerBar1.Groups.Count > 0) Then
' Set AllowEdit to true for the first Group.
Me.ultraExplorerBar1.Groups(0).Settings.AllowEdit = DefaultableBoolean.True
' Display some info about the editor attached to the first Group.
If (Not Me.ultraExplorerBar1.Groups(0).Settings.Editor Is Nothing) Then
If (Me.ultraExplorerBar1.Groups(0).Settings.Editor.IsInEditMode = True) Then
Debug.WriteLine("The editor for the first group is in edit mode")
Else
Debug.WriteLine("The editor for the first group is not in edit mode")
End If
End If
' Display whether or not we are using an editor control on the first group.
If (Not Me.ultraExplorerBar1.Groups(0).Settings.EditorControl Is Nothing) Then
Debug.WriteLine("The first group is using an editor control.")
Else
Debug.WriteLine("The first group is not using an editor control.")
End If
End If
End Sub