对界面上N个输入框进行特殊字符的屏蔽，有什么快速有效的办法没？

Question

接到任务，要对之前他人写的代码进行修改，其中有个界面上20+个文本框，要求对每一个文本框都要禁止用户输入SQL的特殊字符，我想问下有没有什么快速有效的办法，不行的话就只好一个个拷代码了。

Answer 1

遍历控件的text属性，判断

Answer 2

这个不用遍历吧，1 to me.controls.count -1 得到什么？都知道是textbox用来输入了。就每个keypress里第一句都指向同一个函数呗，返回个整型值，如果是非法就返回个0，让keyascii = 0就行了。20个，好像不多吧，再多就用控件数组呀，有这技术还不行为什么呢？是不？呵呵。

Answer 3

在文本框控件数组的Change事件中编写：
Private Sub Text1_Change(Index as integer)   
        '在这里加入禁止用户输入SQL的特殊字符。
         '例如：Text1(Index)<>"HH" and  Text1(Index)<>"TT"  
           
End Sub

Answer 4

如果以后常用这种，不如做个ocx，以后引用就好了。