+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة (/showthread.php?tid=26553)
الصفحات:
1
2
استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - Hazem1 - 18-09-18
بسم الله الرحمن الرحيم
إخواني الكرام أقوم باستخدام هذا الكود في البحث عن القيمة المكتوبة في الصندوق النصي داخل الداتاجريدفيو والحمد لله تظهر النتائج،
PHP كود :
Table15BindingSource.Filter = String.Format("[Exp] like '%" & TextBox6.Text & "%'")
أود استخدام كود في حالة عدم الرجوع بقيمة من البحث، بمعنى أن تكون الداتاجريدفيو فارغة يُظهر رسالة بأن القيمة غير مُتاحة "Value Not Available"
وجزاكم الله خيراً ورضي عنكم.
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - elgokr - 18-09-18
مرحباً اخى Hazem1
فقط اضع الكود التالى اسفل سطر البحث
كود :
If DataGridView1.RowCount <> 0 Then MsgBox("Value Not Available")وبكده اذا وجد ان الناتج من البحث اصبح فارغ
سيقوم بعرض رسالة مباشراً
يمكنك بعد ذلك اضافة كود اسفل منه كالتالى
كود :
TextBox6.Text = Nothingوبكده سيقوم بتفرغ البحث واعادة بيانات الـ DataGridView1
كاملاً لما كان عليه قبل اتمام البحث
تذكر بان يكون الامر فى حدث
PHP كود :
TextBox6_TextChanged
تحياتى لك
وتمنياتى لك التوفيق
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - Hazem1 - 18-09-18
(18-09-18, 09:40 PM)elgokr كتب :مرحباً اخى Hazem1
فقط اضع الكود التالى اسفل سطر البحث
كود :
If DataGridView1.RowCount <> 0 Then MsgBox("Value Not Available")
وبكده اذا وجد ان الناتج من البحث اصبح فارغسيقوم بعرض رسالة مباشراً
يمكنك بعد ذلك اضافة كود اسفل منه كالتالى
كود :
TextBox6.Text = Nothing
وبكده سيقوم بتفرغ البحث واعادة بيانات الـ DataGridView1كاملاً لما كان عليه قبل اتمام البحث
تذكر بان يكون الامر فى حدث
PHP كود :
TextBox6_TextChanged
تحياتى لكوتمنياتى لك التوفيق
أهلاً بك أخي الحبيب elgokr عساك بخير حالٍ، الغريب جداً أن الرسالة ظهرت في كلا الحالتين إذا كانت الداتاجريدفيو تحتوي على قيمة أو بدون قيمة، سأرفق صورة لتوضيح ماظهر معي
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - elgokr - 18-09-18
(18-09-18, 10:22 PM)Hazem1 كتب :(18-09-18, 09:40 PM)elgokr كتب :مرحباً اخى Hazem1
فقط اضع الكود التالى اسفل سطر البحث
كود :
If DataGridView1.RowCount <> 0 Then MsgBox("Value Not Available")
وبكده اذا وجد ان الناتج من البحث اصبح فارغسيقوم بعرض رسالة مباشراً
يمكنك بعد ذلك اضافة كود اسفل منه كالتالى
كود :
TextBox6.Text = Nothing
وبكده سيقوم بتفرغ البحث واعادة بيانات الـ DataGridView1كاملاً لما كان عليه قبل اتمام البحث
تذكر بان يكون الامر فى حدث
PHP كود :
TextBox6_TextChanged
تحياتى لكوتمنياتى لك التوفيق
أهلاً بك أخي الحبيب elgokr عساك بخير حالٍ، الغريب جداً أن الرسالة ظهرت في كلا الحالتين إذا كانت الداتاجريدفيو تحتوي على قيمة أو بدون قيمة، سأرفق صورة لتوضيح ماظهر معي
اسف اخى سهواً منى ليس اكثر
غير فقط التالى فى الكود
كود :
<> 0الى
كود :
= 0او بعد كلمة If ضع كلمة Not
طبق اى من الحلين وسيتم حل المشكلة خطاء السهو منى
تحياتى لك
وتمنياتى لك التوفيق
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - Hazem1 - 18-09-18
(18-09-18, 10:36 PM)elgokr كتب :(18-09-18, 10:22 PM)Hazem1 كتب :(18-09-18, 09:40 PM)elgokr كتب :مرحباً اخى Hazem1
فقط اضع الكود التالى اسفل سطر البحث
كود :
If DataGridView1.RowCount <> 0 Then MsgBox("Value Not Available")
وبكده اذا وجد ان الناتج من البحث اصبح فارغسيقوم بعرض رسالة مباشراً
يمكنك بعد ذلك اضافة كود اسفل منه كالتالى
كود :
TextBox6.Text = Nothing
وبكده سيقوم بتفرغ البحث واعادة بيانات الـ DataGridView1كاملاً لما كان عليه قبل اتمام البحث
تذكر بان يكون الامر فى حدث
PHP كود :
TextBox6_TextChanged
تحياتى لكوتمنياتى لك التوفيق
أهلاً بك أخي الحبيب elgokr عساك بخير حالٍ، الغريب جداً أن الرسالة ظهرت في كلا الحالتين إذا كانت الداتاجريدفيو تحتوي على قيمة أو بدون قيمة، سأرفق صورة لتوضيح ماظهر معي
اسف اخى سهواً منى ليس اكثر
غير فقط التالى فى الكود
كود :
<> 0
الى
كود :
= 0
او بعد كلمة If ضع كلمة Not
طبق اى من الحلين وسيتم حل المشكلة خطاء السهو منى
تحياتى لكوتمنياتى لك التوفيق
لا عليك أخي الحبيب، أعانك الله على عملك، هل أخي تقصد أن أضع الكود بهذا الشكل لأني أشعر أنني اخطأت بشيءٍ والله المُستعان
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - elgokr - 18-09-18
الصورة الاولى هى الصحيحة
والتى هىكود :
If DataGridView1.RowCount = 0 Then MsgBox("Value Not Available")وبخصوص المقصود باضافة Not
بحيث الكود يكون بهذا الشكلكود :
If Not DataGridView1.RowCount <> 0 Then MsgBox("Value Not Available")تحياتى لك
وتمنياتى لك التوفيق
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - Hazem1 - 18-09-18
أخي الكريم لا يهم حل المُشكلة اليوم، تستطيع أن تنال قسطًا من الراحة وإن شاء الله ستُحل لاحقاً.
(18-09-18, 11:07 PM)elgokr كتب :الصورة الاولى هى الصحيحةوالتى هى
كود :
If DataGridView1.RowCount = 0 Then MsgBox("Value Not Available")
وبخصوص المقصود باضافة Notبحيث الكود يكون بهذا الشكل
كود :
If Not DataGridView1.RowCount <> 0 Then MsgBox("Value Not Available")
تحياتى لكوتمنياتى لك التوفيق
سُبحان الله، جربت كلاهما ولا أدري أين خطأي، هل برأيك أخي أقوم بوضع الكود في مكان غير زر البحث ؟
هل ممكن يكون الخطأ أنني أعتمدت على استخدام أداة Datagridview دون إدخال أسماء الأعمدة عن طريق الأكواد ؟ أو أن هناك خاصية هي التي منعت تنفيذ الكود؟
لأن الكود ينفذ في كلا الحالتين إما أن تظهر الرسالة دائماً في حالة البحث مع وجود قيمة فارغة أو البحث مع عدم وجود قيمة فارغة.
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - elgokr - 18-09-18
لا عليك اخى الحبيب
فقط استبدل هذه الجملة
PHP كود :
DataGridView1.RowCount
بالجملة دى
PHP كود :
DataGridView1.ColumnCount
واذا لم يحدث اى شئ
قم باستخدام كود عرض الرسالة التالى
وقول لى ما العدد الذى ظهر معك فى كل مرة تقوم بالبحث لكل كودكود :
MsgBox(DataGridView1.ColumnCount)الكود الثاني
كود :
MsgBox(DataGridView1.RowCount)تحياتى لك
وتمنياتى لك التوفيق
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - Hazem1 - 19-09-18
(18-09-18, 11:48 PM)elgokr كتب :لا عليك اخى الحبيب
فقط استبدل هذه الجملة
PHP كود :
DataGridView1.RowCount
بالجملة دى
PHP كود :
DataGridView1.ColumnCount
واذا لم يحدث اى شئقم باستخدام كود عرض الرسالة التالىوقول لى ما العدد الذى ظهر معك فى كل مرة تقوم بالبحث لكل كود
كود :
MsgBox(DataGridView1.ColumnCount)
الكود الثاني
كود :
MsgBox(DataGridView1.RowCount)
تحياتى لكوتمنياتى لك التوفيق
الجملة الأولى والجملة الثانية، مثلما حضرتك توقعت لم يحدث شيء
أما الثالثة فقد كان العدد 5 أعمدة ثابت في جميع عمليات البحث
والرابعة إذا كان هناك قيمة فيتم عد الصفوف ويضيف لها صف فارغ يعني مثلاً 7 صفوف يحتووا على قيم وصف فارغ فيكون الإجمالي 8 ، وإذا تم البحث ولم تكن هناك قيمة يظهر عدد 1 ويكون فارغ بدون قيم.
RE: استخدام كود البحث ثم عند عدم وجود نتيجة في الداتا جريدفيو تظهر رسالة - elgokr - 19-09-18
جميل جداً اذا انت كده حليت المشكلة من خلال الاستخدام الرابع
كل ما عليك فعله هو ان تجعل الكود قبل = 0 يضاف فقط -1
لتصبح بهذا الشكل
كود :
Count - 1 = 0لن اضيف الكود كاملاً ساترك انت من تقوم باضافة الكود
حتى تتمكن من معرفة الامر وان تكون الصورة واضحة لديك
فالتكرار سيجعل منك التعرف والتفهم للامر سريعاً
سانتظر منك اضافة الكود للسطر المطلوب لاكون
على علم انك اصبحت على دراية كاملة بالامر
تحياتى لك
وتمنياتى لك التوفيق