Dim dt As New DataTable
 
   dt.Columns.Add("IntCol", GetType(Integer))
   dt.Rows.Add(12)
 
   Dim bs As New BindingSource(dt, Nothing)
 
   Dim val As Integer = _
   DirectCast(DirectCast(bs.Item(0), DataRowView).Item("IntCol"), Integer)