hi
It loses this value due to the lack of horizontal scrolling (dgv.ScrollBars =ScrollBars.Vertical). How can I prevent this? It causes noise. (noise \flicker). thank
Public Class frmHScroll
'Objects dgv,dgvTotal As DataGridView
Private Sub dgv_ColumnWidthChanged(sender As Object, e As DataGridViewColumnEventArgs) Handles dgv.ColumnWidthChanged
WidthsChange()
End Sub
Private Sub dgv_RowHeadersWidthChanged(sender As Object, e As EventArgs) Handles dgv.RowHeadersWidthChanged
WidthsChange()
End Sub
Private Sub WidthsChange()
dgvTotal.RowHeadersWidth = dgv.RowHeadersWidth
dgv.Columns.Cast(Of DataGridViewColumn).ToList().ForEach(Sub(h) dgvTotal.Columns(h.Index).Width = h.Width)
dgv.Columns.Cast(Of DataGridViewColumn).ToList().ForEach(Sub(h) dgvTotal.Columns(h.Index).Visible = h.Visible)
dgv_Resize(Nothing, Nothing)
End Sub
Private Sub dgv_Resize(sender As Object, e As EventArgs) Handles dgv.Resize
dgv.HorizontalScrollingOffset = dgvTotal.HorizontalScrollingOffset 'is Line Problem
' dgvTotal.Columns("ColOffset").Visible = dgv.Rows.Count > dgv.DisplayedRowCount(False)
End Sub
Private Sub dgv_ColumnAdded(sender As Object, e As DataGridViewColumnEventArgs) Handles dgv.ColumnAdded
dgv.ScrollBars = ScrollBars.Vertical 'to Horizontal Scroll Hide Of Main dgv
End Sub
Private Sub dgvTotal_Scroll(sender As Object, e As ScrollEventArgs) Handles dgvTotal.Scroll
dgv.HorizontalScrollingOffset = e.NewValue
End Sub
End Class


Problem
dgv.HorizontalScrollingOffset = dgvTotal.HorizontalScrollingOffset 'is Line Problem