private void fpSpread1_TouchStripOpening(object sender, FarPoint.Win.Spread.TouchStripOpeningEventArgs e)
       {
           if (e.Area == FarPoint.Win.Spread.TouchStripShowingArea.Column) {
           e.Cancel = true;  
           FarPoint.Win.Spread.ColumnTouchStrip touchStrip1 = new FarPoint.Win.Spread.ColumnTouchStrip(this.fpSpread1);
           touchStrip1.Items["Paste"].Visible = false;
           touchStrip1.Show(new Point(e.X - 20, e.Y - 35 - touchStrip.Height));
           }
       }

Private Sub fpSpread1_TouchStripOpening(sender As Object, e As FarPoint.Win.Spread.TouchStripOpeningEventArgs)
If (e.Area = FarPoint.Win.Spread.TouchStripShowingArea.Column) Then
e.Cancel = True
Dim touchStrip As New FarPoint.Win.Spread.ColumnTouchStrip(Me.fpSpread1)
touchStrip.Items("Paste").Visible = False
touchStrip.Show(New Point(e.X - 20, e.Y - 35 - touchStrip.Height))
End If
End Sub