Public ReadOnly Property Column As Integer

Dim instance As SheetStyleModelEventArgs
Dim value As Integer
 
value = instance.Column

public int Column {get;}

FarPoint.Win.Spread.Model.BaseSheetStyleModel model;

model = (FarPoint.Win.Spread.Model.BaseSheetStyleModel)fpSpread1.ActiveSheet.Models.Style;

model.Changed += new FarPoint.Win.Spread.Model.SheetStyleModelEventHandler(model_StyleModelChanged);
    
private void button1_Click(object sender, System.EventArgs e)
{
    FarPoint.Win.Spread.StyleInfo sInfo = new FarPoint.Win.Spread.StyleInfo();
    sInfo.BackColor = Color.Teal;
    model.AltRowCount = 2;
    model.SetDirectAltRowInfo(0, sInfo);
}

private void model_StyleModelChanged(object sender, FarPoint.Win.Spread.Model.SheetStyleModelEventArgs e)
{
    textBox1.Text = e.Column.ToString();
}

Friend WithEvents model As FarPoint.Win.Spread.Model.BaseSheetStyleModel

model = FpSpread1.ActiveSheet.Models.Style

Dim h As FarPoint.Win.Spread.Model.SheetStyleModelEventHandler = AddressOf model_StyleModelChanged
AddHandler model.Changed, h

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim sInfo As New FarPoint.Win.Spread.StyleInfo
    sInfo.BackColor = Color.Teal
    model.AltRowCount = 2
    model.SetDirectAltRowInfo(0, sInfo)
End Sub

Private Sub model_StyleModelChanged(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.Model.SheetStyleModelEventArgs)
    TextBox1.Text = e.Column.ToString()
End Sub