Private Sub FpSpread1_DragDropBlock(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.DragDropBlockEventArgs) Handles
FpSpread1.DragDropBlock
TextBox1.Text = "The beginning row is " & e.DestinationRowBegin & " and the ending row is " & e.DestinationRowEnd
End Sub