+تېما يوللاش
شەرەريوللانغان ۋاقتى:2017-7-4 13:35 1244 قېتىم كۆرۈلدى3 ئىنكاس يېزىلدى
مەلۇم قەۋەتكە يۆتكىلىش
بىزنىڭ پىروگىراممىمىزدا تېكىست رامكىللىرىغا(TextBox) ياش قىممىتىنى، پۇل قىممىتىنى ۋە ياكى كىملىك قىممىتىگە ئوخشاش ئالاھىدە قىممەتلەرنى كىرگۈزىدىغان يەرلەر بولىدۇ. ئەگەر بۇ يەرلەرگە ماس كەلمەيدىغان ھەرپ-بەلگىلەر ئارلىشىپ قالسا ساندانغا ساقلىغاندا ياكى بىرتەرەپ قىلغاندا خاتالىق يۈز بېرىشى مۇمكىن. شۇڭا بىز ئىشلەتكۈچىلەرنىڭ كىرگۈزۈش دائىرىسىنى چەكلەپ بېرىشىمىزغا توغرا كىلىدۇ. تۆۋەندە بىز پۈتۈن سان، پارچە سان ۋە كىملىكنى مىسال قىلىپ سۆزلەپ ئۆتىمىز.
ئەمەلىيەتتە ماسكىلانغان تېكىست رامكىسى(MaskedTextBox) ئارقىلىقمۇ بۇ ئۈنۈملەرگە ئېرىشكىلى بولسىمۇ لىكىن يەنىلا بەزى كەمچىلىكلەر بار. مەسىلەن: گەرچە سانلا كىرگۈزگىلى بولىدىغان قىلغىلى بولسىمۇ لىكىن چوقۇم رەقەم سانىنى مۇقىم قىلىۋىتىشىمىزگە توغرا كىلىدۇ. شۇڭا تۆۋەندە بىز تېكىست رامكىسى(TextBox) ئارقىلىق بۇ ئۈنۈملەرنى كۆرۈپ ئېتىمىز.

ئەڭ ئاۋۋال ئۈچ تېكىست رامكىسى(TextBox) ئەكىرىمىز، ئاندىن بۇ تېكىست رامكىللىرىنىڭ KeyPress(كونۇپكا بىسىلىغاندا) ھادىسىگە تۆۋەندىكى كودلارنى يازىمىز.
  1. 'VB.NET
  2. '''
  3. ''' پۈتۈن سان
  4. '''
  5.    
  6. Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
  7.     If AscW(e.KeyChar) = Keys.Back Then Return
  8.     If Not IsNumeric(e.KeyChar) Then
  9.         e.Handled = True
  10.     End If
  11. End Sub

  12. '''
  13. ''' پارچە سان
  14. '''

  15. Private Sub TextBox2_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox2.KeyPress
  16.     If AscW(e.KeyChar) = Keys.Back Then Return
  17.     If Not IsNumeric(e.KeyChar) AndAlso Not (e.KeyChar = "." AndAlso Not sender.Text.Contains(".")) Then
  18.         e.Handled = True
  19.     End If
  20. End Sub

  21. '''
  22. ''' كىملىك
  23. '''

  24. Private Sub TextBox3_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox3.KeyPress
  25.     If AscW(e.KeyChar) = Keys.Back Then Return
  26.     If Not IsNumeric(e.KeyChar) AndAlso Not (e.KeyChar.ToString.ToUpper = "X" AndAlso sender.TextLength = 17) OrElse sender.TextLength >= 18 Then
  27.         e.Handled = True
  28.     End If
  29. End Sub

  30. //C#
  31. ///
  32. /// پۈتۈن سان
  33. ///

  34. private void TextBox1_KeyPress(object sender, KeyPressEventArgs e)
  35. {
  36.     if (Strings.AscW(e.KeyChar) == (int)Keys.Back)
  37.         return;
  38.     if (!Information.IsNumeric(e.KeyChar))
  39.         e.Handled = true;
  40. }

  41. ///
  42. /// پارچە سان
  43. ///

  44. private void TextBox2_KeyPress(object sender, KeyPressEventArgs e)
  45. {
  46.     if (Strings.AscW(e.KeyChar) == (int)Keys.Back)
  47.         return;
  48.     if (!Information.IsNumeric(e.KeyChar) && !(e.KeyChar == '.' && !TextBox2.Text.Contains(".")))
  49.         e.Handled = true;
  50. }

  51. ///
  52. /// كىملىك
  53. ///

  54. private void TextBox3_KeyPress(object sender, KeyPressEventArgs e)
  55. {
  56.     if (Strings.AscW(e.KeyChar) == (int)Keys.Back)
  57.         return;
  58.     if (!Information.IsNumeric(e.KeyChar) && !(e.KeyChar.ToString().ToUpper() == "X" && TextBox3.TextLength == 17) || TextBox3.TextLength >= 18)
  59.         e.Handled = true;            
  60. }
مەزمۇننى كۆچۈرۈۋېلىش
قېنى سىزمۇ سىناپ بېقىڭ.
پىروگىراممىغا قىزىقىدىغانلار ئاستىدىكى چىپار كود(ئىككىلىك كود)نى سايىلەپ ياكى «شەرەر»، «xarar_09» دەپ ئىزدىتىپ شەرەر سالونىنى قىتىۋالساڭلار بولىدۇ.



مەنبە: شەرەر تورى
ھەمبەھرىلەش: QQ دوست ۋە توپQQ دوست ۋە توپQQ ھويلىسىQQ ھويلىسىتېڭشۈن مىكروبلوگىتېڭشۈن مىكروبلوگىتېڭشۈن دوستلارتېڭشۈن دوستلار
ساقلاشساقلاشھەمبەھرھەمبەھرقوللايمەنقوللايمەن3قوللىمايمەنقوللىمايمەن

3ئادەم ئىنكاس يازدى

تۆر
tanha52014 ۋاقتى: 2017-7-4 17:27:04
رەھمەت سىزىگەتېرىشىڭ
گىلەم
kadrla ۋاقتى: 2017-7-4 19:48:59
رەھمەت سىزگە ، تولىمۇتەپسىلىي يوللاپ بېرىپسىز.قوللىرىڭىزغا دەرت كەلمىسۇن.تېخىمۇ يېڭى يېڭى تېمىلارنى يوللىشىڭىزغا تىلەكداش ، مەن.
ئورۇندۇق
54545 ۋاقتى: 2017-7-4 20:13:35
بۇرۇن بۇ مەسىلىنى بەك تەستە ھەل قىلغانىدىم، رەھمەت
كىرگەندىن كېيىن ئىنكاس يازالايسىز كىرىش | ئەزا بولۇش

سەھىپە جۇغلانما قائىدىسى