منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مساعدة في كود البحث
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ، كل عام و انتم بخير و من العايدين أخواني الكرام

لدي مشكلة في الكود التالي ، بعد أن اعمل إعادة بحث مرة أخرى ، او إذا كان الاسم المراد البحث عنه غير موجود تخرج لي الخطأ التالي في الصورة

الكود كامل للتعديل عليه


كود :
Conn.Open()
       Dim dataad As New OleDbDataAdapter("SELECT * FROM HadiData where f2 LIKE  '" & TextBox1.Text & "%'", Conn)
       DataSet1.Clear()
       dataad.Fill(DataSet1, "HadiData")
       Conn.Close()
       DataGridView1.DataSource = DataSet1
       DataGridView1.DataMember = "HadiData"
       If Trim(TextBox1.Text) = "" Then
           Conn.Open()
           Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn)
           DataSet1.Clear()
           DataAdapter1.Fill(DataSet1, "HadiData")
           Conn.Close()
       End If
       dataad = New OleDb.OleDbDataAdapter("select * from Photo where idcard=" & TextBox6.Text & " ", Conn)
       DataSet1 = New DataSet
       dataad.Fill(DataSet1)

       If DataSet1.Tables(0).Rows.Count <> 0 Then
           PictureBox1.DataBindings.Clear() : PictureBox3.DataBindings.Add("Image", DataSet1.Tables(0), "idphoto", True)
       End If
       If TextBox3.Text = "" Then
           MsgBox("       لايـوجد نتائج لعملية بحثك ")
           TextBox1.Focus()
       End If


لو وضعت مشروعك لحصلت على طريقة سهلة ومفهومة
المشروع شبه خاص و لا أستطيع ان احذف البيانات و التعديلات على الفورم

المشكلة واضحة في الكود ، ارجوا من الاخوان الافاضل مراجعة الكود
تأكد من جميلة الأستعلام الثانيه        " ' &   & ' "

أكتبها كذا 
الحاجه الأخرى قبل أستخدام Dateset 
حاول تكتب السطر هذا DS=new DateSet
(08-09-17, 06:32 AM)Amjad كتب : [ -> ]اخ طلال ارجو المساعدة..
صمم مشروعا واحفظهً باسم "سلسلة"
احفظ النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة "
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.
اضف زر اوامر بعنوان سلسلة وبالنقر عليه يتم حساب مجموع عدد حدود من السلسلة يتم ادخالها عن طريق لوحة المفاتيح .
(!7/S=x+(x³/3!)+(x^5/5!)+(x^7
ضروري ولك الشكر

صمم مشروعا واحفظهً باسم "سلسلة"
احفظ النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة " 
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.


هاذي بسويها لك الباقي معرف والله
هلا يابو وسم ،، اعتقد والله العالم اسم الحقل غير موجود في الجدول .

تاكد او راسلني ونشوفه سوا اذا حبيت .
[quote pid='105305' dateline='1504839023']
صمم مشروعا واحفظهً باسم "سلسلة"
احفظ النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة " 
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.
هاذي بسويها لك الباقي معرف والله
[/quote]
اخ طلال مو مشكلة زكاتك اكتبلي الكود

ابو وسم لو تكرمت..
ضروري لو سمحتم 
السؤال..
صمم مشروعا واحفظهً باسم "سلسلة"
النموذج باسم "سلسلة"
اعط النموذج عنوان "برنامج سلسلة " 
اضف زر اوامر بعنوان خروج وبالنقر عليه يتم الخروج من السلسلة.
اضف زر اوامر بعنوان سلسلة وبالنقر عليه يتم حساب مجموع عدد حدود من السلسلة يتم ادخالها عن طريق لوحة المفاتيح .
(!S=x+(x³/3!)+(x^5/5!)+(x^7/7

شرح السلسلة..
مجموع(x قوة 2n+1 )/ (2n+1) ) 
حدود المجموع من n=1 الى n=7
(07-09-17, 09:28 AM)أبووسم كتب : [ -> ]المشروع شبه خاص و لا أستطيع ان احذف البيانات و التعديلات على الفورم

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

مثل ما ذكر أحد الأخوة نريد نعرف كيف شغلك في المشروع عشان نعرف طريقتك ويتم توجيهك للطريقة الصحيحة لا أكثر
ابو وسم...لو تكرمت تشوفلي سؤالي ضروري

او الاخت علا..
ولكم جزيل الشكر...
عندي امتحان بالجامعة
شكرا للجميع و سوف اعمل مشروع مشابه له