تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود لحذف البيانات الحرفية المدخلة لحقل رقمي
#1
السلام عليكم
خصصت نوع حقل معين رقمي tinyint في جدول بقاعدة بيانات بالفيجوال بيسك .
عند ادخال قيمة بداخله بطريقة details :
لو رقمية عادي ..
أما لو حرفية يقف المؤشر ولا ينتقل للخلية التي بعدها .. وهذا شئ طبيعي ..
أريد كود يعرض لي رسالة "لقد قمت بادخال قيمة حرفية في خانة هذا الحقل الرقمي" ويقوم بحذف القيمة الحرفية
وشكراً
الرد }}}}
تم الشكر بواسطة:
#2
كود :
Dim ErrProv As New ErrorProvider


    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If IsNumeric(e.KeyChar) Or Asc(e.KeyChar) = 8 Then ' يعني إذا كان المفتاح المضغوط رقمي أو هو مفتاح التراجع
            e.Handled = False ' يتم السماح بالكتابة أو الحذف
            ErrProv.SetError(Me.TextBox1, "") ' تفريغ أداة عرض الأخطاء
        Else
            e.Handled = True ' هذا الأمر لا يسمح للمستخدم بكتابة القيم النصية
            ErrProv.SetError(Me.TextBox1, "لقد حاولت ادخال قيمة حرفية في خانة هذا الحقل الرقمي")
        End If
    End Sub
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}}
تم الشكر بواسطة:
#3
شكرا .. جزاك الله خيراً
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار عن الجداول المتعددة في قاعدة البيانات اكسس أبووسم 4 85 14-01-17, 12:36 PM
آخر رد: أبووسم
  ياشباب ارجو منكم المساعده لدي مشاكل في اضافه الصورة الى قاعده البيانات وعمل بحث ammar ali 3 148 13-01-17, 11:15 PM
آخر رد: ammaraliali
  [VB.NET] استقبال البيانات عن طريق serail port engmedomed@gmail.com 1 61 11-01-17, 02:13 AM
آخر رد: مساعدة
  تصدير البيانات الى PDF باستخدام ITextSharp لايدعم اللغة العربية فاطمة غ 8 338 04-01-17, 12:00 AM
آخر رد: مساعدة
  تغيير قاعدة البيانات الى .bak صبري زينوبي 5 125 01-01-17, 02:33 PM
آخر رد: صبري زينوبي
  ماهو كود اضافة صفوف الداتا قرد الي قاعدة البيانات SQL SERVER معتز الجازوي 0 64 26-12-16, 05:13 AM
آخر رد: معتز الجازوي
  مساعده اريد كود لحذف عدد من الصفوف من الداتا قرد فيو وكذلك تنحذف من قاعدة البيانات معتز الجازوي 2 101 25-12-16, 01:44 PM
آخر رد: thevirus
  [VB.NET] اريد إضافة صورة للموظف في جدول أخر بنفس قاعدة البيانات أبووسم 11 559 18-12-16, 07:15 PM
آخر رد: أبووسم
  ما هو كود حفظ البيانات من الداتا جريد فيو إلى قاعدة البيانات kofa 4 265 18-12-16, 05:00 AM
آخر رد: zinom
  أستدعاء البيانات adel27 2 97 17-12-16, 07:01 PM
آخر رد: adel27

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


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