Public ReadOnly Property Column As Integer

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

public int Column {get;}

private void fpSpread1CellClick(object sender, FarPoint.Win.Spread.CellClickEventArgs e)
{
      FarPoint.Win.Spread.HitTestInformation hti;
      FarPoint.Win.Spread.HeaderHitTestInformation hi;
      hti = fpSpread1.HitTest(e.X, e.Y);
      hi = hti.HeaderInfo;
      if (hti.Type == HitTestType.ColumnHeader)
      {
            MessageBox.Show(hi.Column.ToString());
      }   
}

Private Sub FpSpread1CellClick(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.CellClickEventArgs)
      Dim hti As FarPoint.Win.Spread.HitTestInformation
      Dim hi As New FarPoint.Win.Spread.HeaderHitTestInformation
      hti = FpSpread1.HitTest(e.X, e.Y)
      hi = hti.HeaderInfo
      If hti.Type = HitTestType.ColumnHeader Then
            MessageBox.Show(hi.Column.ToString())
      End If
End Sub