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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] كيفية عمل اكثر من IF و them واحدة ALIOMAR27135 2 109 15-08-17, 09:09 PM
آخر رد: ALIOMAR27135
  [سؤال] مالقيمة المناسبة لــ الثريد او المؤقت بحيث يكون مجموع الصور متناسقا مع مدة الملف الصو سعود 1 88 10-08-17, 10:48 PM
آخر رد: سعود
  [سؤال] استفسار عن امكانية مشاركة برامج فيجول بيسك بين اكثر من حاسوب Marwan9990 7 215 21-07-17, 12:49 AM
آخر رد: أبوبكر سويدان
  مطلوب مساعدة في كود الفلتر المشروط khaled12345 2 107 12-07-17, 03:05 PM
آخر رد: khaled12345
  [VB.NET] مطلوب مساعدة بشكل عاجل في حل مشكلة في الإتصال بالقاعدة "بمقابل مادي" asadtaif 4 207 22-06-17, 11:04 PM
آخر رد: moh_g
  كيف تجعل الكتابة تكون في وسط الكومبو بوكس khaled12345 4 201 17-06-17, 01:27 AM
آخر رد: khaled12345
  محتاج كود ربط قاعدة اكسس علي اكثر من جهاز hatem555 1 145 11-06-17, 06:52 PM
آخر رد: sendbad100
Smile [كود] مطلوب كود قصير لكن مهم ارجو ان تفيدونى elmezo 4 246 29-05-17, 02:49 PM
آخر رد: elmezo
  [VB.NET] اريد حل لموضع تايمر ضمن الاكواد تالية e-coder 5 234 21-05-17, 09:38 PM
آخر رد: Amir_alzubidy
  كيف تكون جملة insert في جدول بشرط وفي خلية واحدة فقط ahmedfa71 0 125 16-05-17, 07:05 PM
آخر رد: ahmedfa71

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


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