Public ReadOnly Property Area As TouchStripShowingArea

Dim instance As TouchStripItemClickEventArgs
Dim value As TouchStripShowingArea
 
value = instance.Area

public TouchStripShowingArea Area {get;}

protected void Page_Load(object sender, EventArgs e)
       {
           if (this.IsPostBack) return;
           FarPoint.Web.Spread.TouchStrip ts = new FarPoint.Web.Spread.TouchStrip();
           FarPoint.Web.Spread.TouchStripItem item1 = new FarPoint.Web.Spread.TouchStripItem("Red");
           FarPoint.Web.Spread.TouchStripItem item2 = new FarPoint.Web.Spread.TouchStripItem("Green");
           FarPoint.Web.Spread.TouchStripItem item3 = new FarPoint.Web.Spread.TouchStripItem("Blue");      
           ts.Items.Add(item1);
           ts.Items.Add(item2);
           ts.Items.Add(item3);
           item1.AutoPostBack = true;
           item2.AutoPostBack = true;            
           FpSpread1.TouchStrips[FarPoint.Web.Spread.TouchStripShowingArea.Row] = ts;           
       }

       protected void FpSpread1_TouchStripItemClicked(object sender, FarPoint.Web.Spread.TouchStripItemClickEventArgs eventArgs)
       {
           FpSpread1.ActiveSheetView.Cells[0, 0].Value += eventArgs.Area.ToString();
           FpSpread1.SaveChanges();            
       }

Protected Sub Page_Load(sender As Object, e As EventArgs)
    If Me.IsPostBack Then
        Return
    End If
    Dim ts As New FarPoint.Web.Spread.TouchStrip()
    Dim item1 As New FarPoint.Web.Spread.TouchStripItem("Red")
    Dim item2 As New FarPoint.Web.Spread.TouchStripItem("Green")
    Dim item3 As New FarPoint.Web.Spread.TouchStripItem("Blue")
    ts.Items.Add(item1)
    ts.Items.Add(item2)
    ts.Items.Add(item3)
    item1.AutoPostBack = True
    item2.AutoPostBack = True
    FpSpread1.TouchStrips(FarPoint.Web.Spread.TouchStripShowingArea.Row) = ts
End Sub

Protected Sub FpSpread1_TouchStripItemClicked(sender As Object, eventArgs As FarPoint.Web.Spread.TouchStripItemClickEventArgs)
    FpSpread1.ActiveSheetView.Cells(0, 0).Value += eventArgs.Area.ToString()
    FpSpread1.SaveChanges()
End Sub