Private Sub Page_Load(ByVal sender As System.Object,ByVal e As System.EventArgs)Handles MyBase.Load
If(Me.IsPostBack)Then Return
Dim dm As FarPoint.Web.Spread.Model.DefaultSheetAxisModel=CType(FpSpread1.ActiveSheetView.ColumnAxisModel,FarPoint.Web.Spread.Model.DefaultSheetAxisModel)
dm.SetSize(0,140)
dm.SetSize(1,50)
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.DefaultSheetAxisModel=CType(FpSpread1.ActiveSheetView.ColumnAxisModel,FarPoint.Web.Spread.Model.DefaultSheetAxisModel)
dm.Swap(0,2,1)
End Sub