Public ReadOnly Property Button As MouseButtons

Dim instance As CellClickEventArgs
Dim value As MouseButtons
 
value = instance.Button

public MouseButtons Button {get;}

private void fpSpread1_CellClick(object sender, FarPoint.Win.Spread.CellClickEventArgs e)
{
    if(e.Button == MouseButtons.Left && e.ColumnHeader == false && e.RowHeader == false)
    {
        fpSpread1.ActiveSheet.Cells[e.Row, e.Column].BackColor = Color.Yellow;
    }
    else if (e.Button == MouseButtons.Right)
    {
        e.Cancel = true;
    }
}

Private Sub FpSpread1_CellClick(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.CellClickEventArgs) Handles FpSpread1.CellClick
    If e.Button = MouseButtons.Left And e.ColumnHeader = False And e.RowHeader = False Then
        FpSpread1.ActiveSheet.Cells(e.Row, e.Column).BackColor = Color.Yellow
    ElseIf e.Button = MouseButtons.Right Then
        e.Cancel = True
    End If
End Sub