Private NumberColumn As B4XTableColumn 'Global in example.
NumberColumn = B4XTable1.AddColumn("Interesting Number", B4XTable1.COLUMN_TYPE_NUMBERS)
'change the visible columns order
'remove the number columns
B4XTable1.VisibleColumns.RemoveAt(B4XTable1.VisibleColumns.IndexOf(NumberColumn))
B4XTable1.VisibleColumns.InsertAt(1, NumberColumn)
B4XTable1.Refresh