以下代码在Advance事件里实现
Dim row As Integer = ME.FpSpread1.ActiveSheet.ActiveRowIndex
Dim col As Integer = ME.FpSpread1.ActiveSheet.ActiveColumnIndex
'当焦点在右下角的时候,焦点从Spread里离散
If (row = ME.FpSpread1.ActiveSheet.RowCount - 1 AndAlso _
col = ME.FpSpread1.ActiveSheet.ColumnCount - 1) Then
e.Cancel = True
Me.SelectNextControl(FpSpread1, e.AdvanceNext, True, True, True)
End