[Abdh111]

السلام عليكم قبل سؤالي الف مليون شكر للقائمين علي هذا المنتدي الرائع
ولي سؤال
هذا الكود كتبته للبحث عن اسم الفرع وتعبئة النتيجة في داتا جريد 

كود :

       Try
           Call conecDB()
           SQL = SQL = "select * from Tab_Main Where Car_No = '" & Txt_Car_ReqNo.Text & "'"
           ad = New SqlDataAdapter(SQL, Conn)

           With Scmd
               .CommandText = SQL
               Sdr = .ExecuteReader
           End With

       Catch ex As Exception
           MsgBox(ex.Message)
           End
       End Try

يعطي رسالة الخطأ التي بالصورة 
أرجو المساعدة أو 

أريد كود البحث عن قيمة في تكست وإدارج النتيجة في داتا جريد بنفس الفورم
ولكم جزيل الشكر والتقدير