'宣言 Protected Overridable Sub OnScroll( _ ByVal e As ScrollEventArgs _ )
protected virtual void OnScroll( ScrollEventArgs e )
イベントが発生すると、デリゲートを通じてイベント ハンドラーが呼び出されます。
また OnScroll メソッドによって派生クラスは、デリゲートを付加せずに、イベントを処理することができます。これは、派生クラスでイベントを処理する際によく用いられる手法です。
継承時の注意: 派生クラスで OnScroll をオーバーライドする場合は、登録されたデリゲートがイベントを受信できるようにするため、必ず基本クラスの OnScroll メソッドを呼び出してください。
Imports Infragistics.Win Imports Infragistics.Win.UltraWinScrollBar Private Sub ultraScrollBar1_Scroll(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Handles ultraScrollBar1.Scroll Dim scrollbar As UltraScrollBar = sender If scrollbar.Orientation = Orientation.Vertical Then Debug.WriteLine("Vertical scrollbar scrolled") Else Debug.WriteLine("Horizontal scrollbar scrolled") End If Debug.WriteLine("ScrollEventType: " + e.Type.ToString()) Debug.WriteLine("Scrolled to: " + e.NewValue.ToString()) End Sub
using System.Diagnostics; using Infragistics.Win; using Infragistics.Win.UltraWinScrollBar; private void ultraScrollBar1_Scroll(object sender, System.Windows.Forms.ScrollEventArgs e) { UltraScrollBar scrollbar = sender as UltraScrollBar; if ( scrollbar.Orientation == Orientation.Vertical ) Debug.WriteLine( "Vertical scrollbar scrolled"); else Debug.WriteLine( "Horizontal scrollbar scrolled"); Debug.WriteLine( "ScrollEventType: " + e.Type.ToString()); Debug.WriteLine( "Scrolled to: " + e.NewValue.ToString()); }