AfterScroll
滚动表后执行。
e参数属性：
Table:
引发事件的TableAfterScroll事件一般和ScrollPosition属性一起配合使用。
示例
假定希望在表A滚动后，表B能同步滚动到相同的位置，只需将表A的AfterScroll事件代码设置为：
Tables("表B").ScrollPosition = e.Table.ScrollPosition
如果要求垂直方向同步滚动，水平方向不同步滚动，代码为:
Dim p As Point = Tables("表B").ScrollPosition
p.Y = e.Table.ScrollPosition.Y
Tables("表B").ScrollPosition = p