Imports System.Diagnostics
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinExplorerBar
Private Sub Button45_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button45.Click
' Put the first item in the first group into edit mode.
If (Me.ultraExplorerBar1.Groups.Count > 0 AndAlso Me.ultraExplorerBar1.Groups(0).Items.Count > 0) Then
Me.ultraExplorerBar1.Groups(0).Items(0).Rename()
End If
End Sub