Question

Visual Basic 2010，.NET 3.5 有没有办法实际确定DataGridView的水平滚动条是活动还是可见？当DGV的水平滚动条出现时，我需要移动一些项目。

Answer 1

试试这个：

dgvYourDataGridView.Controls.OfType(Of HScrollBar).SingleOrDefault.Visible

Answer 2

只是为了给你一个想法（我现在没时间，或者在我面前的视觉工作室）：

   For Each c In DataGridView1.Controls
        If c.GetType() Is GetType(VScrollBar) Then
            Dim vbar as VScrollBar= DirectCast(c, VScrollBar)
            If vbar.Visible = True Then
               'Do whatever you like
            End If
        End If
    Next

Answer 3

以下是滚动条可见性更改时从How to detect the vertical scrollbar in a DataGridView control

引发事件的VB.Net版本

Public Class MyGrid
  Inherits DataGridView

  Public Event ScrollbarVisibleChanged As EventHandler

  Public Sub New()
    AddHandler Me.HorizontalScrollBar.VisibleChanged, _
               AddressOf HorizontalScrollBar_VisibleChanged
  End Sub

  Public ReadOnly Property HorizontalScrollbarVisible() As Boolean
    Get
      Return HorizontalScrollBar.Visible
    End Get
  End Property

  Private Sub HorizontalScrollBar_VisibleChanged(sender As Object, e As EventArgs)
    RaiseEvent ScrollbarVisibleChanged(Me, EventArgs.Empty)
  End Sub
End Class

Answer 4

我拿了Nianios示例，进行了一些调整，然后确定滚动条是否可见。谢谢！

Private Function HScrollBarVisible() As Boolean
    Dim ctrl As New Control
    For Each ctrl In DataGridView1.Controls
        If ctrl.GetType() Is GetType(HScrollBar) Then
            If ctrl.Visible = True Then
                Return True
            Else
                Return False
            End If
        End If
    Next
    Return Nothing
End Function

确定DataGridView的水平滚动条是否存在？

4 个答案: