共享函数？？

Question

有一组控件（文本框），由于在下是菜鸟，想共享一个keydown事件。比如说是在
查询数据时，选了按姓名，打回车即可调用函数显示了，但如果选了按学号，那
不是又要写一个keydown了吗.....
有前辈能指点在下吗？？
谢谢！！！

Answer 1

每个文本框都必须有一个keydown事件，事件中只需一句代码去调用那个共用的Sub，这个Sub中是你每个文本框都要用到的代码。

Answer 2

把公共的东东做成一个sub，在每个文本框中调用这个sub，如你说的“姓名”“学号”等等，可以作为参数，传给sub。另外也可以把文本框作为sub的参数。

Answer 3

不知道这样行不行。写一个公共查询过程，如：
public sub myQueryDef (QueryDefString as String,QueryDefField as String)
dim strSql as StringstrSql = "select * from 你的表名 where "+QueryDefField +"='"+queryDefString+"'"
....
....
End Sub调用时,如：
Private txtName_KeyDown(..........)
myQueryDef txtName.Text , "姓名"
End Sub

Answer 4

txt()控件数组
 
txt_keydown(byval index as integer)
select index
 .....