راهنمای برای کد عدد نویسی تو چند تا TextBox

[rezaiy.ali]

با سلام
من تو برنامه ام برای اینکه کاربر نتونه حروف را تو بعضی از Textbox ها وارد کنه تو رویداد KeyPress اون TextBox ها از


IfChar.IsLetter(e.KeyChar) Then
e.Handled = True
EndIf

استفاده کردم ام
حال با زیاد شدن این TextBox ها اگه قرار باشه هر بار از این تکه کد استفاده کنم خوانای برنامه ام کم میشه.
من سعی کردم از Sub استفاده کنم اما نتونستم.
لطف می فرمایید یه راه حل برای این مشکل ارایه بفرمایید.
متشکرم

[choobin84]

به چند طریق می توانید از کد نویسی های اضافه پرهیز کنید.
یکی از بهترین راهها اینه که یک کنترل تکست باکس usercontrol بنویسید و در رویداد keypress آن کد رو بگذارید .
ی راه دیگه هم اینه که وقتی می خاهید برای تمام تکست باکس ها یک رویداد رو بنویسید
در همون محیط کد نویسی برای textBox1 کدتان را بنویسید اونوقت در تابعی که مربوط به رویداد هست شما دنبال کلمه Handles با رنگ ابی بگردید.نام بقیه textboxها رو بنویسید و نقطه را بنید و keypress رو انتخاب کنید.
به کد زیر دقت کنید...



Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress, TextBox2.KeyPress, TextBox3.KeyPress, TextBox4.KeyPress

End Sub

[saeed_rezaei]

سلام
همانطور که آقای چوبین 84 گفتند، یه راهش استفاده از textbox هست که خود کاربر این امکانات رو بهش داده باشه.
این usercontrol قبلا ساخته شده و شما می تونید اون رو از لینک زیر بردارید.
http://barnamenevis.org/forum/showthread.php?t=70965&highlight=textbox