FarPoint.Web.Spread.SheetView sv = FpSpread1.ActiveSheetView;
sv.ColumnCount = 6;
sv.PageSize = 20;
sv.RowCount = 20;
sv.OperationMode = FarPoint.Web.Spread.OperationMode.SingleSelect;
for (i = 0; i <= 19;i++)
{
    for (j = 0; j <= 5;j++)
	{
		sv.SetValue(i, j, 100 + i);
	}
}
	 
	
		Dim sv As FarPoint.Web.Spread.SheetView
Dim i, j As Integer
sv = FpSpread1.ActiveSheetView
sv.ColumnCount = 6
sv.PageSize = 20
sv.RowCount = 20
sv.OperationMode = FarPoint.Web.Spread.OperationMode.SingleSelect
For i = 0 To 19
    For j = 0 To 5
        sv.SetValue(i, j, 100 + i)
    Next j
Next i