|
■No98558 (VB201初心者 さん) に返信
> Visual Basic 2010 Windows Form
.NET Framework 4 も VS2010 も 既にサポートが終了しているので
後継バージョンへの移行をお奨めします。既に 10 年以上前の製品ですし。
> マウスの移動が終了したことを検出するイベントは、ありますでしょうか？
『Scroll イベント発生後、最初にアイドル状態になったタイミング』を
スクロール終了と捉えてみるのは如何でしょうか。
Public Class Form1
Private scrolling As Boolean = False
Private Sub EndScroll(sender As Object, e As EventArgs)
RemoveHandler Application.Idle, AddressOf EndScroll
scrolling = False
Debug.WriteLine("スクロール終了 " & Now.ToString("HH:mm:ss.ffff"))
End Sub
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
DataGridView1.ColumnCount = 10
DataGridView1.RowCount = 30000
End Sub
Private Sub DataGridView1_Scroll(sender As Object, e As System.Windows.Forms.ScrollEventArgs) Handles DataGridView1.Scroll
If Not scrolling Then
scrolling = True
AddHandler Application.Idle, AddressOf EndScroll
End If
End Sub
End Class
|