请教使用ArcMap自带的VBA开发的时候 怎么获取范围发生改变时的事件

请问使用ArcMap自带的VBA开发的时候 如何获取范围发生改变时的事件？
也就是范围一改变就触发的事件

------解决方案--------------------
这个需要事件来实现
Private WithEvents pTran As DisplayTransformation
Set pTran = pDoc.ActivatedView.ScreenDisplay.DisplayTransformation
Private Sub pTran_VisibleBoundsUpdated(ByVal sender As esriDisplay.IDisplayTransformation, ByVal sizeChanged As Boolean)
MsgBox "OK! "
End Sub