برای اینکه یک تعداد کاراکتر خاص را در TextBox محدود کنیم میتوانیم از روش زیر استفاده نماییم.به طور مثال :مثلاً اجازه دهیم فقط کاراکترهای "0123456789ABCDEFabcdef" در TextBox تایپ گردد.Option ExplicitPublic Sub TextFilter(KeyAscii As Integer)Dim strValid As StringstrValid = "0123456789ABCDEFabcdef"If KeyAscii > 26 ThenIf InStr(strValid, Chr(KeyAscii)) = 0 ThenKeyAscii = 0End IfEnd IfEnd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)TextFilter KeyAsciiEnd Subموضوعات مرتبط: Visual Basicبرچسبها: محدود کردن , کاراکترهای , تایپ شده , TextBox بخوانید, ...ادامه مطلب
وقتی میخواهیم فقط اعداد را در تکست باکس محدود کنیم و دیگر هیچ کاراکتری در تکست باکس تایپ نشود، از کد زیر استفاده میکنیم.Option ExplicitPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii >= 48 And KeyAscii = 57 ThenElseKeyAscii = 0End IfEnd Subبرچسبها: تایپ اعداد , Number , Vb6 بخوانید, ...ادامه مطلب