Public ReadOnly Property Type As HitTestType

Dim instance As HitTestInformation
Dim value As HitTestType
 
value = instance.Type

public HitTestType Type {get;}

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

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