[حسن الجلب]

السلام عليكم ورحمه الله وبركاته كيفيه التحكم في scroll الخاص بالجريد فيو عن طريق الكود سواء الأفقي أو الرأسي!

[حسن الجلب]

السلام عليكم هل يوجد حل ؟

[DR.YASER]

أهلا اخى حسن
جرب استخدام هذا الكود و أخبرنى بالنتيجة .. مع ملاحظات أدرجها لك أسفل الكود

كود :

Option Strict On

Public Class Form1

 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
   'Fill grid with dummy data
   Dim dtb As New DataTable("MyDataTable")
   For i As Integer = 0 To 99
     dtb.Columns.Add("C" & i.ToString)
   Next i
   For j As Integer = 0 To 99
     Dim s(99) As String
     For i As Integer = 0 To 99
       s(i) = ((i + j) Mod 100).ToString
     Next i
     dtb.Rows.Add(s)
   Next j
   DataGridView1.DataSource = dtb
 End Sub

 Private Sub HScrollBar1_Scroll(sender As Object, e As ScrollEventArgs) Handles HScrollBar1.Scroll
   'Use the DataGridView.FirstDisplayedCell property to scroll the display
   DataGridView1.FirstDisplayedCell = DataGridView1.Rows(DataGridView1.CurrentCell.RowIndex).Cells(e.NewValue)
 End Sub
End Class

*- يفضل استخدام الاجراء DataGridView.CurrentCell