'----------------------------------------------------------------------------------------------
'スクロール時に2つのグリッドを連動して動かす
'----------------------------------------------------------------------------------------------
Private Sub DataGridView1_Scroll(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Handles DataGridView1.Scroll
'カラム ※あまり効果ない
Me.DataGridView2.FirstDisplayedScrollingColumnIndex = Me.DataGridView1.FirstDisplayedScrollingColumnIndex
'カラム
Me.DataGridView2.HorizontalScrollingOffset = Me.DataGridView1.HorizontalScrollingOffset
'行
Me.DataGridView2.FirstDisplayedScrollingRowIndex = Me.DataGridView1.FirstDisplayedScrollingRowIndex
End Sub
0 件のコメント:
コメントを投稿