+تېما يوللاش
شەرەر يوللانغان ۋاقتى: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
بۇرۇن بۇ مەسىلىنى بەك تەستە ھەل قىلغانىدىم، رەھمەت
كىرگەندىن كېيىن ئىنكاس يازالايسىز كىرىش | ئەزا بولۇش

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

ئالپ تور بېتىدە قانۇنغا خىلاپ، سىياسى، دىنىي ، مىللەتلەر ئىتتپاقلىقىغا بۇزغۇنچىلىق قىلىش خاراكتىردىكى ، سېرىق، شەھۋانىي مەزمۇندىكى يازمىلار، ئۈن-سىن، رەسىملەر چەكلىندۇ

ئالپ تور بېتىدە ۋە ئالپ ئۈندىدار سالونىدا يوللانغان مەزمۇنلار ئالپ تورىغا تەۋە، رۇخسەتسىز كۆچۈرۈپ تارقىتىشقا بولمايدۇ. كۆچۈرۈپ تارقاتقۇچىلار بايقالسا قانۇنى مەسئۇلىيتى سۈرۈشتۈرۈلدۇ

特别警告:本网站坚决不允许发表违反国家法律法规的、含有分裂煽动内容的、引起民族矛盾的、破坏民族团结的、带有宗教色彩或有色情的文章

帖子、图片、音视频、电影、歌曲等。若发现将IP地址上报相关部门处理,后果自负。注意自我保护,谨防上当受骗

快速
回复
返回
列表
返回
顶部