Textbox يستقبل احرف ولايستقبل الفراغ

   If Char.IsLetter(ch) = True Or ch = " " Then
				e.Handled = False
			Else
				e.Handled = True
			End If

الآن سيقبل الفراغ مع الحروف

الطريقة التي استعملها

	Private Sub TextBox1_KeyPress
		If InStr("0123456789", e.KeyChar.ToString) > 0 Then e.Handled = True
	End Sub

أكيد أن هناك طرق أخرى .... و لكن هذه تفي بالغرض

السلام عليكم

يمكنك استخدام هذه الطريقة

If (!
	(((e.KeyChar >= 'a') And (e.KeyChar <= 'z')) Or
	((e.KeyChar >= 'A') And (e.KeyChar <= 'Z')) Or
	(e.KeyChar == ' '))) Then
		e.Handled = true;
	End If

ضع هذا الكود في الحدث KeyPress للـ TextBox

بس طريقة الاستاذ lelian هي افضل

وشكرا

السلام عليكم ورحمة الله وبركاته

اخي lelian اشكرك كثيرا حلك هو الحل اللذي اتبعته جزاك الله خيرا

اخي الفريد جزاك الله خيرا على الطريقة

اخي عبد الكريم كنعان جزاك الله خيرا

السؤال قد طُرح من قبل يمكنك البحث في ذلك الشأن.

لإستفادة من الخانة النصية تتكلم العربية على هذا الرابط تجدها بالتوفيق إن شاء الله.

اخي العزيز الشهاب لقد اتبعت طريقة اخي lelian

ولكن اسعدني موضوعك عن الخانة النصية وبالحقيقة انت مبدع دائما

اتمنى لك التوفيق والسداد دائما إن شاء الله