'宣言 Protected Overridable Sub OnTabScrolling( _ ByVal e As Infragistics.Win.UltraWinTabs.TabScrollingEventArgs _ )
protected virtual void OnTabScrolling( Infragistics.Win.UltraWinTabs.TabScrollingEventArgs e )
Imports Infragistics.Win Imports Infragistics.Win.UltraWinTabs Imports Infragistics.Win.UltraWinTabControl Private Sub ultraTabControl1_TabScrolling(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinTabs.TabScrollingEventArgs) Handles ultraTabControl1.TabScrolling Dim sb As New System.Text.StringBuilder() sb.Append("Tabs are about to scroll. ScrollType: ") sb.Append(e.ScrollType) sb.Append(", increment: ") sb.Append(e.ScrollIncrement) Debug.WriteLine(sb.ToString()) ' Set cancel to true to prevent the operatiion from proceeding 'e.Cancel = true End Sub
using System.Diagnostics; using Infragistics.Win; using Infragistics.Win.UltraWinTabs; using Infragistics.Win.UltraWinTabControl; private void ultraTabControl1_TabScrolling(object sender, Infragistics.Win.UltraWinTabs.TabScrollingEventArgs e) { System.Text.StringBuilder sb = new System.Text.StringBuilder(); sb.Append("Tabs are about to scroll. ScrollType: "); sb.Append(e.ScrollType); sb.Append(", increment: "); sb.Append(e.ScrollIncrement); Debug.WriteLine(sb.ToString()); // Set cancel to true to prevent the operatiion from proceeding //e.Cancel = true; }