Public Function GetModelColumnFromDataColumn( _
   ByVal datacolumn As Integer _
) As Integer

Dim instance As DefaultSheetDataModel
Dim datacolumn As Integer
Dim value As Integer
 
value = instance.GetModelColumnFromDataColumn(datacolumn)

public int GetModelColumnFromDataColumn( 
   int datacolumn
)

DataTable dt = new DataTable("Testing");
int i;
dt.Columns.Add("Number");
dt.Columns.Add("Letter");
dt.Rows.Add(new Object[]{"1", "One"});
dt.Rows.Add(new Object[] {"2", "Two"});
FarPoint.Win.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Win.Spread.Model.DefaultSheetDataModel(dt);
fpSpread1.ActiveSheet.Models.Data = dataModel;
i = dataModel.GetModelColumnFromDataColumn(0);
listBox1.Items.Add(i.ToString());

Dim dt As New DataTable("Testing")
Dim i As Integer
dt.Columns.Add("Number")
dt.Columns.Add("Letter")
dt.Rows.Add(New Object() {"1", "One"})
dt.Rows.Add(New Object() {"2", "Two"})
Dim dataModel As New FarPoint.Win.Spread.Model.DefaultSheetDataModel(dt)
FpSpread1.ActiveSheet.Models.Data = dataModel
i = dataModel.GetModelColumnFromDataColumn(0)
ListBox1.Items.Add(i.ToString())