تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
المساعدة بكتابة جملة IF
#1
    السلام عليكم ورحمة الله و بركاته 

لدي 2 textbox فى البرنامج نوع data فيهم number-integer , number-double 
وبعمل دالة if ان اذا المستخدم لم يدخل بيانات فيهم يعطيه رساله بادخال البيانات 
لكن يعطي خطأ 
الكود المستخدم
الرد
تم الشكر بواسطة:
#2
(08-09-20, 05:16 PM)khaled Mohammed كتب : السلام عليكم ورحمة الله و بركاته 

لدي 2 textbox فى البرنامج نوع data فيهم number-integer , number-double 
وبعمل دالة if ان اذا المستخدم لم يدخل بيانات فيهم يعطيه رساله بادخال البيانات 
لكن يعطي خطأ 
الكود المستخدم

انسخ الكود
لان مافيا اكتبو
الرد
تم الشكر بواسطة:
#3
(08-09-20, 05:19 PM)Hasaneen كتب :
(08-09-20, 05:16 PM)khaled Mohammed كتب : السلام عليكم ورحمة الله و بركاته 

لدي 2 textbox فى البرنامج نوع data فيهم number-integer , number-double 
وبعمل دالة if ان اذا المستخدم لم يدخل بيانات فيهم يعطيه رساله بادخال البيانات 
لكن يعطي خطأ 
الكود المستخدم

انسخ الكود
لان مافيا اكتبو

كود :
       If (String.IsNullOrWhiteSpace(txt_id.Text) AndAlso
           String.IsNullOrWhiteSpace(txt_name.Text) AndAlso
           String.IsNullOrWhiteSpace(txt_700.Text)) Then
           MsgBox("يجب ملأ كافة الحقول")
           Return
       End If

       'جربت هذا ايضا

       If txt_id.Text = 0 And
           txt_name.Text = "" And
           txt_700.Text = 0 Then
           MsgBox("يجب ملأ كافة الحقول")
           Return
       End If
الرد
تم الشكر بواسطة:
#4
مانوع الخطأ ؟؟

ولماذا لا تستخدم حدث Validating لكل مربعات النص ؟
الرد
تم الشكر بواسطة: Hasaneen , Hasaneen
#5
طرقتي قديمه شوي

لاحظ استخدم or وليس and
PHP كود :
'جربت هذا ايضا

       If val(txt_id.Text) = 0 or
           txt_name.Text.trim = "" or
           val(txt_700.Text) = 0 Then
           MsgBox("يجب ملأ كافة الحقول")
           Return
       End If 
الرد
تم الشكر بواسطة: Anas Mahmoud , khaled Mohammed , ابو روضة
#6
(08-09-20, 05:28 PM)Anas Mahmoud كتب : مانوع الخطأ ؟؟

ولماذا لا تستخدم حدث Validating لكل مربعات النص ؟

قاعدة البيانات ACCess
الرد
تم الشكر بواسطة:
#7
ال Validation افضل بصراحة وكثر تطورا وامانا

عدل الخاصية AutoValidate للفورم الى Disable

اضف حدث Validating الى مربعات النص

كود :
   Private Sub TextBox3_Validating(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles TextBox3.Validating, TextBox1.Validating, TextBox2.Validating

       Dim txt As TextBox = sender
       e.Cancel = String.IsNullOrWhiteSpace(txt.Text)

   End Sub


الان عند الحاجة للتأكد من المربعات ليست فارغة استخدم ValidateChildren :

كود :
       If Me.ValidateChildren() = False Then
           MsgBox("يجب ملأ كافة الحقول")
           Return
       End If
الرد
#8
Thumbs Up 
(08-09-20, 05:35 PM)Hasaneen كتب : طرقتي قديمه شوي

لاحظ استخدم or وليس and
PHP كود :
      'جربت هذا ايضا

       If val(txt_id.Text) = 0 or
           txt_name.Text.trim = "" or
           val(txt_700.Text) = 0 Then
           MsgBox("يجب ملأ كافة الحقول")
           Return
       End If 
هذا الكود افاد المطلوب .. اشكرك

(08-09-20, 05:45 PM)Anas Mahmoud كتب : ال Validation افضل بصراحة وكثر تطورا وامانا

عدل الخاصية AutoValidate للفورم الى Disable

اضف حدث Validating الى مربعات النص

كود :
   Private Sub TextBox3_Validating(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles TextBox3.Validating, TextBox1.Validating, TextBox2.Validating

       Dim txt As TextBox = sender
       e.Cancel = String.IsNullOrWhiteSpace(txt.Text)

   End Sub


الان عند الحاجة للتأكد من المربعات ليست فارغة استخدم ValidateChildren :

كود :
       If Me.ValidateChildren() = False Then
           MsgBox("يجب ملأ كافة الحقول")
           Return
       End If
ليست كل الحقول مطلوب ادخالها ، لكن سوف اجرب هذا الكود لتعلمه ، شاكر لحضرتك
الرد
تم الشكر بواسطة: Hasaneen
#9
(08-09-20, 05:45 PM)Anas Mahmoud كتب : ال Validation افضل بصراحة وكثر تطورا وامانا

عدل الخاصية AutoValidate للفورم الى Disable


يا أنس يا أنس يا من جعلت المنتدى ونَس....
تعطى لهذا وتحل مشاكل هذا وكأنك تهُش ذبابة أو تلعب تِنس....
فجزاك الله كل الخير أيها المبرمج الشرس....
الرد
تم الشكر بواسطة: Hasaneen , Hasaneen , Anas Mahmoud , WaeLx , WaeLx
#10
(08-09-20, 07:00 PM)ابو روضة كتب :
(08-09-20, 05:45 PM)Anas Mahmoud كتب : ال Validation افضل بصراحة وكثر تطورا وامانا

عدل الخاصية AutoValidate للفورم الى Disable


يا أنس يا أنس يا من جعلت المنتدى ونَس....
تعطى لهذا وتحل مشاكل هذا وكأنك تهُش ذبابة أو تلعب تِنس....
فجزاك الله كل الخير أيها المبرمج الشرس....

وجزاك بمثله اخي الكريم
اشكرك على الكلام الجميل

(08-09-20, 05:57 PM)khaled Mohammed كتب : ليست كل الحقول مطلوب ادخالها ، لكن سوف اجرب هذا الكود لتعلمه ، شاكر لحضرتك

بسيطة ، اضف الحدث Validating للحقول المطلوب ادخالها فقط

http://vb4arb.com/vb/showthread.php?tid=36184

https://docs.microsoft.com/en-us/dotnet/...nstraints_
الرد
تم الشكر بواسطة: baha , baha , Hasaneen , WaeLx


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Lightbulb ارجوا المساعدة في طباعة الكاشير بدون إظهار التقرير abo.alaa315 6 279 02-05-21, 05:56 PM
آخر رد: alfaiz678
  [VB.NET] جملة الاتصال بقاعدة بيانات اكسس mdb على شبكة بين جهازين tarek 1 147 26-04-21, 06:14 AM
آخر رد: محمد اسماعيل
  جملة الاستعلام بين تاريخين aftfm 0 232 18-03-21, 04:47 PM
آخر رد: aftfm
  ارجو المساعدة في عرض البيانات على التاتا جرد فيو moahmed.abdelmohsen 1 322 15-03-21, 09:38 PM
آخر رد: moahmed.abdelmohsen
  المساعدة في انشاء شريط تحميل progress bar MustafaShaker 1 558 08-03-21, 04:14 PM
آخر رد: alsouf
  [VB.NET] جملة الإتصال بالسيرفر على الشبكة المحلية ZaerAllail 3 303 08-03-21, 06:02 AM
آخر رد: atefkhalf2004
  استفسار على جملة sql المتألق9 1 262 16-02-21, 01:04 AM
آخر رد: ابراهيم ايبو
  المساعدة - بكود زر البحث وخانة رقم التسجيل crazykinko 0 226 18-01-21, 04:52 PM
آخر رد: crazykinko
Lightbulb [VB.NET] أرجو المساعدة اخواني nssow 1 267 12-01-21, 10:23 PM
آخر رد: moosa_alabri
  احتاج كود يقوم بتكملة رقم الجول تلقائيا بنفس الحقل عندما اقوم بكتابة جوال العميل mohamedgadain61 5 408 12-01-21, 07:52 PM
آخر رد: محمد بن عطية

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم