Imports Infragistics.Win.UltraWinDock
...
' Here we explicitly tell the DockManager to use the default values for ShowMenuButton.
' The default values are based on the WindowStyle of the DockManager.
' You do not normally need to set this to Default because that is the value it will use automatically.
Me.UltraDockManager1.ShowMenuButton = Infragistics.Win.DefaultableBoolean.Default
' Get the names of all the WindowStyle values.
Dim windowStyleNames As String() = System.Enum.GetNames(GetType(WindowStyle))
' Create the message that will be shown in the message box.
Dim message As String = "The menu button will be shown by default when the WindowStyle is: "
' Test the default value of ShowMenuButton for each WindowStyle
Dim name As String
For Each name In windowStyleNames
Dim style As WindowStyle = CType(System.Enum.Parse(GetType(WindowStyle), name), WindowStyle)
Me.UltraDockManager1.WindowStyle = style
If Me.UltraDockManager1.ShowMenuButtonResolved = True Then
MessageBox.Show(message + style.ToString())
End If
Next name
' Explicitly tell the DockManager to show the Menu button on pane captions.
Me.UltraDockManager1.ShowMenuButton = Infragistics.Win.DefaultableBoolean.True
If Me.UltraDockManager1.ShowMenuButtonResolved = True Then
MessageBox.Show("This message box will always show.")
End If