Public Property Action As Integer

Dim instance As DragDropBlockEventArgs
Dim value As Integer
 
instance.Action = value
 
value = instance.Action

public int Action {get; set;}

private void fpSpread1_DragDropBlock(object sender, FarPoint.Win.Spread.DragDropBlockEventArgs e)
{
    if (e.Action == 0)
    {
        textBox1.Text = "The selection was moved";
    }
    else if (e.Action == 1) 
    {
        textBox1.Text = "The selection was copied";
    }
}

Private Sub FpSpread1_DragDropBlock(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.DragDropBlockEventArgs) Handles
FpSpread1.DragDropBlock
    If e.Action = 0 Then
        TextBox1.Text = "The selection was moved"
    ElseIf e.Action = 1 Then
        TextBox1.Text = "The selection was copied"
    End If
End Sub