[abumuhannadzym]

السلام عليكم 
الفائدة للجميع
عملت تايمر يحدث كل 3 ثواني المعلومات في الداتا جريد ولكن مع كل تحديث يتغير كل شي يعني الدتا جريد تتحرك 
السؤال كيف اجعل التحديث بالخلفية بدون متتحديث كل الدتا جريد 
يعني تتغير المعلومات فقط

[mhmd_911]

عندي برنامج مشابه للفكرة.
ضع مشروعك للتعديل عليه.

[abumuhannadzym]

(09-10-16, 07:46 PM)mhmd_911 كتب : عندي برنامج مشابه للفكرة.
ضع مشروعك للتعديل عليه.

Dim cs As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & SLibro & ";" & " Extended Properties='Excel 8.0;HDR=NO;IMEX=1'"
Dim dAdapter As New OleDbDataAdapter("Select * From [" & sHoja & "$] ", cs)
Dim datos As New DataSet
dAdapter.Fill(datos)
Dim dt As DataTable = datos.Tables(0)
For i As Integer = 0 To dt.Columns.Count - 1
dt.Columns(i).ColumnName = dt.Rows(0).Item(i)
Next
Dim dr As DataRow = dt.Rows(0)
dr.Delete()
With index.DataGridView
.Columns(0).DefaultCellStyle.Alignment = DataGridViewContentAlignment.BottomLeft
.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.Columns(0).Width = 100
.Columns(1).Width = 100
End With
index.DataGridView.DataSource = dt

تفضل اخي 

[abumuhannadzym]

هل من جديد

[hglogtd]

انا عندي احتجت اسوي تحديث وعملت button
ووضعت كود يمسح بيانات الداتا جريد ويعيد البيانات من القاعدة

Me.ResTableAdapter.ClearBeforeFill = True
       Me.ResTableAdapter.Fill(Me.DatasetDataSet.res)
       MsgBox("تم تحديث السجلات")



وماشي الوضع معاي

[abumuhannadzym]

(12-10-16, 07:33 PM)hglogtd كتب : انا عندي احتجت اسوي تحديث وعملت button
ووضعت كود يمسح بيانات الداتا جريد ويعيد البيانات من القاعدة

Me.ResTableAdapter.ClearBeforeFill = True
       Me.ResTableAdapter.Fill(Me.DatasetDataSet.res)
       MsgBox("تم تحديث السجلات")



وماشي الوضع معاي

انا اقصد تحديث بدون ان تتحرك الدتا جريد تجد الرقم يتحدث فقط  يعني يتغير الرقم بدون مايعمل اخفاء للارقام