Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If (Me.IsPostBack) Then Return
FpSpread1.ActiveSheetView.RowCount = 10
Dim i As Integer
For i = 0 To 9
FpSpread1.ActiveSheetView.SetValue(i, 0, i)
FpSpread1.ActiveSheetView.SetValue(i, 1, i)
FpSpread1.ActiveSheetView.SetValue(i, 2, i)
Next
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dm As FarPoint.Web.Spread.Model.DefaultSheetDataModel = CType(FpSpread1.ActiveSheetView.DataModel, FarPoint.Web.Spread.Model.DefaultSheetDataModel)
dm.ClearData(0, 0, 10, 2)
End Sub