2016-08-03 30 views
1

我想在DataGridView中有一個「幫助」遊標,但只有第一行到最後一行,不包括列標題。我當前使用的代碼顯示了datagridview控件上的所有幫助光標 - 列標題和行下的空白空間,因爲我在面板中停靠了datagridview。這可能很簡單,但我該如何解決這個問題?當我離開DataGridView時,我有代碼將光標設置回默認值。只在datagridview行中設置光標

Private Sub DataGridView1_CellMouseMove(sender As Object, e As DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseMove 
    Dim dgv As DataGridView = DataGridView1 
    For r As Integer = 1 To dgv.RowCount - 1 
     Me.Cursor = Cursors.Help 
    Next 
End Sub 

Private Sub DataGridView1_CellMouseLeave(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellMouseLeave 
    Me.Cursor = Cursors.Default 
End Sub 

回答

2

這將改變光標只在單元格上時纔有幫助。它不包括標題行和左列以及背景。您可以根據需要更改條件

Private Sub DataGridView1_MouseMove(sender As Object, e As MouseEventArgs) Handles DataGridView1.MouseMove 
    Dim myHitTest = DataGridView1.HitTest(e.X, e.Y) 
    If myHitTest.RowIndex >= 0 AndAlso myHitTest.ColumnIndex >= 0 Then 
     DataGridView1.Cursor = Cursors.Help 
    Else 
     DataGridView1.Cursor = Cursors.Default 
    End If 
End Sub 
+0

您應該將'Me.Cursor'更改爲'DataGridView1.Cursor',否則您可以將表單的光標設置爲幫助光標。 – TnTinMn

+0

謝謝Verdolino,它像一個魅力! – LuckyLuke82

+0

謝謝TnTinMn,我也改變了。 – LuckyLuke82