FarPoint.Web.Spread.Extender.SliderCellType slide = new FarPoint.Web.Spread.Extender.SliderCellType();
slide.Decimals = 1;
slide.EnableHandleAnimation = true;
slide.Minimum = 0;
slide.Maximum = 100;
slide.TooltipText = "{0}";
slide.Orientation = AjaxControlToolkit.SliderOrientation.Horizontal;
slide.RaiseChangeOnlyOnMouseUp = true;
slide.ShowEditor = true;
slide.Steps = 10;
FpSpread1.ActiveSheetView.Cells[0, 0].CellType = slide;
Dim slide As New FarPoint.Web.Spread.Extender.SliderCellType()
slide.Decimals = 1
slide.EnableHandleAnimation = True
slide.Minimum = 0
slide.Maximum = 100
slide.TooltipText = "{0}"
slide.Orientation = AjaxControlToolkit.SliderOrientation.Horizontal
slide.RaiseChangeOnlyOnMouseUp = True
slide.ShowEditor = True
slide.Steps = 10
FpSpread1.ActiveSheetView.Cells(0, 0).CellType = slide