23-01-17, 05:12 AM
استخدم BindingSource بدلا من BindingContext لتجده أسهل، شاهد هذا الكود
كود :
'إنشاء ارتباط بالمصدر
Private WithEvents BindingSource1 As New BindingSource With {.DataSource = dataset1}
'الأول
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Me.BindingSource1.MoveFirst()
End Sub
'السابق
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
Me.BindingSource1.MovePrevious()
End Sub
'التالي
Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
Me.BindingSource1.MoveNext()
End Sub
'الأخير
Private Sub Button4_Click(sender As System.Object, e As System.EventArgs) Handles Button4.Click
Me.BindingSource1.MoveLast()
End Sub
'التغير
Private Sub BindingSource1_CurrentChanged(sender As Object, e As System.EventArgs) Handles BindingSource1.CurrentChanged
Label4.Text = String.Format("السجل {0} من {1}", Me.BindingSource1.Position + 1, Me.BindingSource1.Count)
End Sub

