No se controló InvalidCastException

[t0n1]

Hola! Estoy intentando hacer una consulta que me permita mostrar registros en un datagrid y me está tirando ese cártel de error "La conversión de la cadena "Inglés" en el tipo 'Integer' no es válida" en esta parte del procedimeitno:

Código:

 Public Sub Consultar_Registros(ByVal oesc As Escuela)

        Dim CadenaSQL As String
        CadenaSQL = "Select Materia from Materias Where Alumno = " & oesc.Codigo & ""

        Dim DTRESULTADOS As DataTable
        DTRESULTADOS = Obtener_datos(CadenaSQL)

        If DTRESULTADOS.Rows.Count = 0 Then
            MsgBox("NO SE HAN ENCONTRADO RESULTADOS")
        Else

            oesc.Codigo = DTRESULTADOS.Rows(0).Item(0).ToString
        End If

    End Sub

Saludos!