تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مطلوب تعديلات في هذه الاكواد بحيث تكون فعاله اكثر
#1
هذا  الكود يقوم بوضع قيد على التيكست بوكس بحيث يسمح بأدخال الحروف فقط  ولكن هناك مشكله في وضع مساحه بين النص اي ان مفتاح السبيس او المسافه لا يعمل  


        If Char.IsLetter(e.KeyChar) = False And Char.IsControl(e.KeyChar) = False Then e.Handled = True

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

   If Char.IsNumber(e.KeyChar) = False And Char.IsControl(e.KeyChar) = False Then If e.KeyChar = CChar(".") Then e.Handled = False Else e.Handled = True
الرد }}}
تم الشكر بواسطة:
#2
PHP كود :
Private Sub TextBox1_KeyPress(sender As ObjectAs System.Windows.Forms.KeyPressEventArgsHandles TextBox1.KeyPress
    
If Not (Char.IsControl(e.KeyChar) Or Char.IsLetter(e.KeyChar) Or Char.IsWhiteSpace(e.KeyChar)) Then e.Handled True
End Sub 

PHP كود :
Private Sub TextBox2_KeyPress(sender As ObjectAs System.Windows.Forms.KeyPressEventArgsHandles TextBox2.KeyPress
    Dim dec 
As Integer 2
    
If Not (Char.IsControl(e.KeyChar) Or Char.IsDigit(e.KeyChar) Or e.KeyChar "."Then e.Handled True
    
If (e.KeyChar "." And sender.Text.Contains(".")) Then e.Handled True
    
If sender.Text.Contains(".") And Char.IsDigit(e.KeyCharThen
        If sender
.Text.ToString.Split(".")(1).Count dec And sender.SelectionStart sender.Text.IndexOf("."Then e.Handled True
    End 
If
End Sub 
الرد }}}
تم الشكر بواسطة:
#3
شكرا لك اخي الكريم ونسأل الله ان تكون في ميزان حسناتك
الرد }}}
تم الشكر بواسطة: amgad525


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ما هو اختصار هذه الاكواد justforit 4 450 22-01-24, 03:10 PM
آخر رد: salamandal
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 638 18-01-24, 11:40 PM
آخر رد: العتيق
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 234 13-01-24, 06:42 PM
آخر رد: melad2002
  [سؤال] كود اظهار رساله في حال وجود الرقم في اكثر من عمود مبرمج صغير 1 6 402 09-01-24, 01:41 AM
آخر رد: Taha Okla
  مطلوب شرح لتقارير DevExpress بلغة vb.net Adel27213 3 322 03-01-24, 12:23 AM
آخر رد: عبد العزيز البسكري
  [VB.NET] مطلوب سورس كود مبيعات h2551996 2 353 17-12-23, 08:03 PM
آخر رد: dr.programming
  [VB.NET] مطلوب تصحيح سطر فى هذا الــ Function AhmedEissa 3 498 13-12-23, 12:55 AM
آخر رد: العتيق
  طريقة إسناد اكثر من جدول للكريستال ريبورت Adel27213 2 353 25-11-23, 11:51 PM
آخر رد: Adel27213
  [VB.NET] حذف اكثر من سطر محدد في جرد فيو h2551996 3 439 25-11-23, 12:30 PM
آخر رد: h2551996
Heart [VB.NET] كيفية جعل الدتاجريديد فيو تظهر عندما تكون قاعدة البيانات فارغه الحزين اليماني 1 371 22-11-23, 05:31 PM
آخر رد: justforit

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


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