منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
اريد تعديل هذا الكود للبحث لاى كلمه فى النص - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : اريد تعديل هذا الكود للبحث لاى كلمه فى النص (/showthread.php?tid=17529)



اريد تعديل هذا الكود للبحث لاى كلمه فى النص - رجل الكهرباء - 02-10-16

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

Private Sub DataCombo1_Change()
On Error Resume Next
Dim x As String
x = DataCombo1
Adodc3.RecordSource = " select * from mm where ad like '" & x & "%'"
Adodc3.CommandType = adCmdText
Adodc3.Refresh

End Sub


RE: اريد تعديل هذا الكود للبحث لاى كلمه فى النص - رجل الكهرباء - 03-10-16

شكرا اخى الكريم وزادك الله علما