Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
FpSpread1.AllowRowMove = True
FpSpread1.AllowRowMoveMultiple = True
End Sub
Private Sub FpSpread1_RowDragMove(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.DragMoveEventArgs) Handles FpSpread1.RowDragMove
ListBox1.Items.Add(e.Count.ToString())
End Sub
Private Sub FpSpread1_RowDragMoveCompleted(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.DragMoveCompletedEventArgs) Handles FpSpread1.RowDragMoveCompleted
ListBox1.Items.Add(e.Count.ToString())
End Sub