Imports Infragistics.Win.UltraWinDock ... Private Sub UltraButton1_Click(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles UltraButton1.Click 'コントロールを保持しているペインがドックされているかどうかを確認します。 If Me.UltraDockManager1.PaneFromControl(Me.UltraDayView1).DockedState = _ DockedState.Docked Then ' ドックされている場合にはフローティング ペインにします。 Me.UltraDockManager1.PaneFromControl(Me.UltraDayView1).Float(True) End If End Sub