IDC资讯中心
henry的vb.net之旅（十二）—事件驱动
韩睿
“可视继承原来这么方便！”我心中默默地感叹一声。一会儿之后，我抬头扫了一眼屏幕上的代码后，突然发现了一个新问题，按钮的单击事件程序现在已经变成了：
vb.net程序
vb程序
private sub btnprotected_click(byval sender as system.object, byval e as system.eventargs) handles btnprotected.click
msgbox("派生的保护按钮")
end sub
private sub command1_click()
……
end sub
而原来的vb程序是那么的简单。现在的参量sender和e是干什么用的？那个handles又是什么东东？还好有老师，我立刻起身，厚着脸把大李请过来，把疑问一一说给他听。
大李推了推眼镜，反问我道：“你应该对windows编程中的事件驱动程序设计很熟悉吧？”（注：此处的windows是指win9x及其以上的操作系统）
“是呀！”看来反问是大李授课的开篇词了，但我也只好先往他的圈套里跳，“事件驱动就是说应用程序的执行流程是由外界发生的事件所确定的。也就是接受到任务才工作的模式。事件就是一个信号，它告知应用程序有重要情况要发生。实际上的执行情况是，各个应用程序把负责不同工作的对象在其运行期间送入windows操作系统，让这些对象等待windows产生的事件，然后加以处理。”
“vb程序员一般也只需要象你这样理解就行了。”大李的话真让我触动，“应该说是windows先产生消息，应用程序中的窗口程序window procedure能接收来自windows的消息，并将其转化为事件，这个我们以后再说。现在来看看事件驱动程序的组成，主要是有事件、对象和事件处理程序三个要素。对象就是完成任务的主体，比如你说的button1；事件么，就是对象要执行的任务，比如单击，就是click事件；那么事件处理程序就是button1_click这段程序了。”
“这个我知道呀！我只是想问一下sender……”我疑惑地回应道。
大李哥摇摇手，打断了我的话。“如果你真正清楚事件驱动的话，就明白了。你看一下，sender是什么类型的变量？”
“object呀！”我无奈地问道着，“但是，……”我隐约感觉到了什么。
大李微笑着说，“sender as object，就一语道破它的来源与用途。object是支持 .net 框架类层次结构中的所有类，并为派生类提供低级别服务。这是 .net 框架中所有类的最终超类；它是类型层次结构的根。一般来说，sender在形参中表示引发事件的源头，就是我刚才所说的三要素中的‘对象’。如果在控件引发的事件中写代码的话，一般都不需要再重新指派，因为它已经默认为是该控件了。当自己写代码来调用某事件程序时，就要注明sender是何物了。”
“也就是说，sender是提供给在事件处理程序代码内部或外部进行调用的吗？”我仍有点不明白。
“可以这样说，你难道看不出vb.net提供给我们的是更全面、更直接的控制吗？再说e，表示的是事件数据，就是一个事件激发所需要的状态信息。在事件引发时不向事件处理程序传递状态信息的事件会将e设为eventargs。如果事件处理程序需要状态信息，则应用程序必须从此类派生一个类来保存数据。比如mousedown事件，系统需要判断mouse的位置、判断是左中右哪个键点击了、判断点击了几下等等，因此该e就必需是system.windows.forms.mouseeventargs类的实例。”大李继续解说着。
“哦，也就是说e是和事件密切相关的喽？”我开始用实际操作来证实一下，我在代码窗口的“类名”下拉列表中选择了button1，在其右边的“方法名称”下拉列表中选择了mosuedown方法，出现的就是button1.mousedown事件处理程序代码段：
private sub button1_mousedown(byval sender as object, byval e as system.windows.forms.mouseeventargs) handles button1.mousedown
end sub
果然，看到e的类型变为system.windows.forms.mouseeventargs。我在代码段内写下e，然后在其后打一个点，出现了一个智能感知菜单（如图1所示）：
与button1.click事件相比，button1.mosuedown事件中的e的属性和方法多出了五个描述事件特征的属性，见表1所述。
button
获取曾按下的是哪个鼠标按钮。
clicks
获取按下并释放鼠标按钮的次数。
delta
获取鼠标轮已转动的制动器数的有符号计数。制动器是鼠标轮的一个凹口。
x
获取鼠标单击的 x 坐标。
y
获取鼠标单击的 y 坐标。
表1 多出的e的属性
“我明白了，那么handles关键字是不是就是用于声明代码是要处理哪个事件的处理过程呢？”我终于开了点窍。
“是的，可不要小看handles，好好利用它，你的程序会变得简洁和灵活。”大李边说边给我写了一段代码：
private sub button1_click(byval sender as system.object, byval e as system.eventargs) _
handles button1.click, button2.click
select case sender.name
case "button1"
msgbox("你点击的是button1")
case "button2"
msgbox("你点击的是button2")
end select
end sub
“在handles后面写了两个事件的声明，就可以在同一段代码中对两个对象进行控制。另外，利用sender和e我们还可以更方便地构建与调用自己的事件处理程序。“大李边写边说。
“是吗？怎么实现？”我不由被激发出了浓浓的兴趣。
（未完待续）
