14-05-19, 01:46 PM
وعليكم السلام ورحمة الله وبركاته
من المؤكد انك تقوم بتعبئة الداتا جريد من خلال
بيانات يتم جلبها من قاعدة البيانات
فى هذه الحالة اذا كان التعبئة تتم من خلال DS
فاليك الكود التالى بدلاً من الكود بموضوعك
كود :
Private Sub TextBoxSearch_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBoxSearch.TextChanged
Try
Dim dv As DataView
dv = New DataView(ds.Tables(0), "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)
DataGridView1.DataSource = dv
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Subمع مراعاه تغيير المسميات فى هذا السطر
كود :
dv = New DataView(ds.Tables(0), "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)طيب واذا كنت تقوم بتعبئة الداتا جريد من خلال DT
فاليك الكود التالى بدلاً من الكود بموضوعك
كود :
Private Sub TextBoxSearch_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBoxSearch.TextChanged
Try
Dim dv As DataView
dv = New DataView(dt, "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)
DataGridView1.DataSource = dv
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Subمع مراعاه تغيير المسميات فى هذا السطر
كود :
dv = New DataView(dt, "MyName Like '%" & TextBoxSearch.Text.Trim & "%' ", "MyName Desc", DataViewRowState.CurrentRows)تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

