'宣言 Public Overloads Function MoveToNewGroup() As MdiTabGroup
public MdiTabGroup MoveToNewGroup()
Imports Infragistics.Win Imports Infragistics.Win.UltraWinTabs Imports Infragistics.Win.UltraWinTabbedMdi Private Sub MoveToNewGroup() ' get the tab associated with the active form Dim activeTab As MdiTab = Me.ultraTabbedMdiManager1.ActiveTab ' if there isn't one or the form is being closed or hidden, ' skip it If activeTab Is Nothing Or Not activeTab.IsFormVisible Then Return End If ' Create a new tab group at the end and move the ' active tab to it. The following statements will ' perform the same action. The overloads that ' accept an MdiTabGroupPosition can be used to have ' the new group created at the beginning or before/after ' the current tab group. ' 'Me.ultraTabbedMdiManager1.MoveToNewGroup(activeTab, MdiTabGroupPosition.Last) 'Me.ultraTabbedMdiManager1.MoveToNewGroup(activeTab) 'activeTab.MoveToNewGroup(MdiTabGroupPosition.Last) If Me.ultraTabbedMdiManager1.CanCreateNewGroup Then activeTab.MoveToNewGroup() End If End Sub Private Sub MoveToNextGroup() ' get the tab associated with the active form Dim activeTab As MdiTab = Me.ultraTabbedMdiManager1.ActiveTab ' if there isn't one or the form is being closed or hidden, ' skip it If activeTab Is Nothing Or Not activeTab.IsFormVisible Then Return End If ' Move the currently active tab to the next group. ' The following statement performs the same action. ' 'Me.ultraTabbedMdiManager1.MoveToGroup(activeTab, MdiTabGroupPosition.Next) activeTab.MoveToGroup(MdiTabGroupPosition.Next) End Sub Private Sub MoveToPreviousGroup() ' get the tab associated with the active form Dim activeTab As MdiTab = Me.ultraTabbedMdiManager1.ActiveTab ' if there isn't one or the form is being closed or hidden, ' skip it If activeTab Is Nothing Or Not activeTab.IsFormVisible Then Return End If ' Move the currently active tab to the next group. ' The following statement performs the same action. ' 'Me.ultraTabbedMdiManager1.MoveToGroup(activeTab, MdiTabGroupPosition.Previous) activeTab.MoveToGroup(MdiTabGroupPosition.Previous) End Sub
using Infragistics.Win; using Infragistics.Win.UltraWinTabs; using Infragistics.Win.UltraWinTabbedMdi; private void MoveToNewGroup() { // get the tab associated with the active form MdiTab activeTab = this.ultraTabbedMdiManager1.ActiveTab; // if there isn't one or the form is being closed or hidden, // skip it if (activeTab == null || !activeTab.IsFormVisible) return; // Create a new tab group at the end and move the // active tab to it. The following statements will // perform the same action. The overloads that // accept an MdiTabGroupPosition can be used to have // the new group created at the beginning or before/after // the current tab group. // //this.ultraTabbedMdiManager1.MoveToNewGroup(activeTab, MdiTabGroupPosition.Last); //this.ultraTabbedMdiManager1.MoveToNewGroup(activeTab); //activeTab.MoveToNewGroup(MdiTabGroupPosition.Last); if (this.ultraTabbedMdiManager1.CanCreateNewGroup) activeTab.MoveToNewGroup(); } private void MoveToNextGroup() { // get the tab associated with the active form MdiTab activeTab = this.ultraTabbedMdiManager1.ActiveTab; // if there isn't one or the form is being closed or hidden, // skip it if (activeTab == null || !activeTab.IsFormVisible) return; // Move the currently active tab to the next group. // The following statement performs the same action. // //this.ultraTabbedMdiManager1.MoveToGroup(activeTab, MdiTabGroupPosition.Next); activeTab.MoveToGroup(MdiTabGroupPosition.Next); } private void MoveToPreviousGroup() { // get the tab associated with the active form MdiTab activeTab = this.ultraTabbedMdiManager1.ActiveTab; // if there isn't one or the form is being closed or hidden, // skip it if (activeTab == null || !activeTab.IsFormVisible) return; // Move the currently active tab to the next group. // The following statement performs the same action. // //this.ultraTabbedMdiManager1.MoveToGroup(activeTab, MdiTabGroupPosition.Previous); activeTab.MoveToGroup(MdiTabGroupPosition.Previous); }