تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة تعبئة الداتا جريد فيو من اكثر من جدول سمير جمال 1 38 منذ 8 ساعة مضت
آخر رد: سمير جمال
  [VB.NET] مطلوب مساعدة في برنامج يحدث اخطاء ay.alhaj 29 565 17-10-18, 11:43 PM
آخر رد: عبد العزيز البسكري
  اظهار اكثر من سطر في أداة NotifyIcon المتألق9 5 115 14-10-18, 10:22 PM
آخر رد: عبد العزيز البسكري
  هل يُمكن عمل بحث بحيث يظهر الناتج في غير الداتاجريدفيو أو في مثيلٍ لها؟ Hazem1 3 94 09-10-18, 07:48 AM
آخر رد: عبدالله الدوسري
  مطلوب شرح اضافة اداة فى الفيجول بيسك Mohamed Magdy 8 210 05-10-18, 12:26 AM
آخر رد: elgokr
  تطبيق الاكواد على GridControl في DevExpress كريم جودي 1 64 02-10-18, 03:26 AM
آخر رد: محمد كريّم
  مطلوب برنامج اعراب جمل عربية المبرمج الممتاز 16 361 28-09-18, 01:18 PM
آخر رد: ابراهيم ايبو
  [VB.NET] استفسار :- بخصوص network بين اكثر من برنامج dubai.eig 3 111 26-09-18, 11:01 PM
آخر رد: dubai.eig
  اقتراحاتكم حول المشروع و على طريقة كتابة الاكواد essawq 13 393 23-09-18, 07:56 PM
آخر رد: elgokr
  [كود] مطلوب كود يقوم بحفظ محتوى textbox فى ملف notepad elgokr 7 1,173 13-09-18, 06:27 PM
آخر رد: YousefOkasha

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


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