PDA

View Full Version : سوال: وارد کردن فقط عدد در Textbox



سعید کشاورز
پنج شنبه 13 مهر 1391, 02:08 صبح
دوستان واسه وارد کردن فقط عدد در Textbox از این کدهای استفاده کردم توی رویداد keypress تکس باکس

if (!char.IsControl(e.KeyChar)&& !char.IsDigit(e.KeyChar) && e.KeyChar != '.')

{
e.Handled = true;
}
یکی توضیح میده اینا چی کار میکنن؟ آخه از یه سایت خارجی گرفتم اینو نمیدونم چی به چیه

harani
پنج شنبه 13 مهر 1391, 03:23 صبح
از این استفاده کن (تو KeyPress تکست باکست) بهتره :


if (!(e.KeyChar >= '0' && e.KeyChar <= '9'))//a
e.Handled = true;//b

جزئیاتشم که مشخصه متوجه میشی !؟
KeyChar که یعنی هر کاراکتری که کاربر بواسطه کیبورد درون تکست باکس وارد میکند.
گفتم که اگه کاراکترها بین اعداد صفر تا 9 نبودند اجازه وارد کردن رو ندهد .

voice.of.silence
پنج شنبه 13 مهر 1391, 12:05 عصر
سلام دوست عزیز:
من برای این کار که تکستباکس فقط عدد را قبول کند از این کد استفاده می کنم که خوب جواب میده.
if (char.IsLetter(e.KeyChar)==true)
{
e.Handled = true;
}

موفق باشی
Voice of Silence

سعید کشاورز
پنج شنبه 13 مهر 1391, 14:26 عصر
از این استفاده کن (تو KeyPress تکست باکست) بهتره :


if (!(e.KeyChar >= '0' && e.KeyChar <= '9'))//a
e.Handled = true;//b

جزئیاتشم که مشخصه متوجه میشی !؟
KeyChar که یعنی هر کاراکتری که کاربر بواسطه کیبورد درون تکست باکس وارد میکند.
گفتم که اگه کاراکترها بین اعداد صفر تا 9 نبودند اجازه وارد کردن رو ندهد .
مرسی..فقط یه سوال..
e.Handled=True یعنی چی؟

سعید کشاورز
پنج شنبه 13 مهر 1391, 14:31 عصر
سلام دوست عزیز:
من برای این کار که تکستباکس فقط عدد را قبول کند از این کد استفاده می کنم که خوب جواب میده.
if (char.IsLetter(e.KeyChar)==true)
{
e.Handled = true;
}

موفق باشی
Voice of Silence
مرسی دوست عزیز..اگه اون خط شرط رو توضیح بدی ممنون میشم

harani
پنج شنبه 13 مهر 1391, 15:12 عصر
مرسی..فقط یه سوال..
e.Handled=True یعنی چی؟

گفتم که e.handle اگه true باشه .یعنی که کاربر حق وارد کردن هیچ کاراکتر به جز کاراکترهای شرط if را نداره .

danialafshari
پنج شنبه 13 مهر 1391, 15:31 عصر
سلام
دوستان تمامی این روش ها مشکل داره، خواهشا این شیوه های غلط رو ترویج ندید!
اگه یک رشته ی شامل حروف هم درون اون تکس باکس Copy و بعد Paste کنید می بینید حروف رو هم میگیره پس خود این یه باگه !
آخه MaskedTextBox هست اونوقت بریم کد نویسی!
کافیه یک maskedTextBox بزاری و Mask اون رو روی Numeric بزاری و تعداد اعدادت هم تنظیم کنی همین !
موفق باشید

harani
پنج شنبه 13 مهر 1391, 16:27 عصر
سلام
دوستان تمامی این روش ها مشکل داره، خواهشا این شیوه های غلط رو ترویج ندید!
اگه یک رشته ی شامل حروف هم درون اون تکس باکس Copy و بعد Paste کنید می بینید حروف رو هم میگیره پس خود این یه باگه !
آخه MaskedTextBox هست اونوقت بریم کد نویسی!
کافیه یک maskedTextBox بزاری و Mask اون رو روی Numeric بزاری و تعداد اعدادت هم تنظیم کنی همین !
موفق باشید

بله حرف شما کاملاً درسته ولی اولاً شاید دوستمان بخواهد یک عددی درج کند که طول آن متغیر باشد .ماسک textBox برای زمانی است که کاربر میخواهد یک چیز مشخصی مانند شماره شناسنامه ,معدل , تاریخ و ... را وارد کند . البته درست میگید که اگه کاربر بخواهد از جایی کپی پیست کند حروف هم شامل میشه . خب میتونه تو رویداد KeyDown بنویسه :


private void textBox1_KeyDown(object sender, KeyEventArgs e) {//c
if (e.Control == true)//j
{
MessageBox.Show("Cut/Copy and Paste Options are disabled");//k
textBox1.Focus();//f
}
}


تو mouse Down هم بنویسه



private void textBox1_MouseDown(object sender, KeyEventArgs e) {//c

ContextMenu cm = new ContextMenu();//j
textBox1.ContextMenu = cm;//h
textBox1.Focus();//f
}


البته راه های آسونتر هم هست ولی فکر کنم برای دوستمون سخت باشه .

ashkan.comp
پنج شنبه 13 مهر 1391, 22:46 عصر
سلام دوست عزیز
اگه میخوای فقط عدد وارد کنی یکی از دوستان یه ابزار به نام txtpronet نوشته که تو همین سایته اگه یه جستجوی کوتاه بکنی حتما پیداش می کنی چندتا از خاصیت هاشو میگم ، خیلی کارو راحت می کنه
تایپ فقط فارسی در تکس باکس
تایپ فقط انگلیسی در تکس باکس
تایپ فقط عدد در تکس باکس
گذاشتن ویلگول بین اعداد مثل 120,000
....امیدوارم مفید باشه

Hadiir.net
چهارشنبه 13 شهریور 1398, 05:51 صبح
با این کد مشکل کپی پست هم حل می شود!



Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If Not Char.IsNumber(e.KeyChar) AndAlso Not Char.IsControl(e.KeyChar) Then
e.Handled = True
End If
End Sub








Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim digitsOnly As System.Text.RegularExpressions.Regex = New System.Text.RegularExpressions.Regex("[^\d]")
TextBox1.Text = digitsOnly.Replace(TextBox1.Text, "")
End Sub





f you want to allow decimals, add
AndAlso Not e.KeyChar = "."to the if statement in the KeyPress section.







اگر متن کپی شده در حافظه دارای اعداد باشد فقط اعداد جایگذاری می شوند و حروف زائد حذف می شوند.

Hadiir.net
چهارشنبه 13 شهریور 1398, 06:26 صبح
150695نمونه پروژه کدهای تست شده: