主题：如何定义事件过程实现e.cancel=true功能

 呃……楼主，不是所有的事件都有e.cancel属性的。

 你想实现什么功能？

 楼主，你这样的效果，可以编写全局事件(窗口的全局事件)。

 编写enter事件，代码可以这样。

If e.Sender.name = "TextBox2" Then
    e.Form.Controls("Button1").Select
End If

你可以给这个控件添加一个enter事件。

http://www.foxtable.com/help/topics/2374.htm

 简单例子。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:定义事件例子.table

 全局代码就是这样。这只是一个例子。

Public Sub txt_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs)
   MessageBox.Show("这是自定义事件!")
End Sub

 中间代码这样写，目的是把焦点离开。

Forms("xxxx").Controls("Button1").Select()

 或者

Dim f As object = e.Form.panel.findform
f.Controls(0).Controls("Button1").Select