'宣言 Public Class AfterScrollEventArgs Inherits System.EventArgs
public class AfterScrollEventArgs : System.EventArgs
Private Sub UltraMonthViewSingle1_AfterScroll(ByVal sender As System.Object, ByVal e As Infragistics.Win.UltraWinSchedule.AfterScrollEventArgs) Handles ultraMonthViewSingle.AfterScroll '---------------------------------------------------------------------------------------------------- ' 説明 ' AfterScroll ' ' コントロールがスクロールされた後に発生します ' BeforeScroll イベントをキャンセルしないと、AfterScroll イベントが発生します ' '---------------------------------------------------------------------------------------------------- ' 以前の値および新しい値をデバッガーに出力します Dim info As String = String.Empty info += "The control was vertically scrolled. The type of scrolling operation was: " info += e.ScrollAction.ToString() Debug.WriteLine(info) End Sub
private void ultraMonthViewSingle1_AfterScroll(object sender, Infragistics.Win.UltraWinSchedule.AfterScrollEventArgs e) { //---------------------------------------------------------------------------------------------------- // 説明 // AfterScroll // // コントロールがスクロールされた後に発生します // BeforeScroll イベントをキャンセルしないと、AfterScroll イベントが発生します // //---------------------------------------------------------------------------------------------------- // 以前の値および新しい値をデバッガーに出力します string info = string.Empty; info += "The control was vertically scrolled. The type of scrolling operation was: "; info += e.ScrollAction.ToString(); Debug.WriteLine( info ); }