Problemas con DataGridView y Relations...

[hector2c]

Hola, he intentado usar Relations en un DataGridView, ya que cuenta con esa función, pero no he podido mostrar el datatable hijo, tan solo el padre.

Reutilize el código en un DataGrid y funciona correctamente.

Es imcompatible Relations en DataGridView???, espero alguien pueda ayudarme, es algo urgente...

Código:

        Dim ObjPadre As New DataTable
        ObjPadre.Columns.Add("IdPadre", GetType(Integer))
        ObjPadre.Columns.Add("Nombre", GetType(String))
        ObjPadre.Rows.Add(1, "Gaseosa")
        ObjPadre.Rows.Add(2, "Galleta")
        ObjPadre.Rows.Add(3, "Gruta")

        Dim ObjHijo As New DataTable
        ObjHijo.Columns.Add("IdHijo", GetType(Integer))
        ObjHijo.Columns.Add("IdPadre", GetType(Integer))
        ObjHijo.Columns.Add("Nombre", GetType(String))
        ObjHijo.Rows.Add(1, 1, "Coca cola")
        ObjHijo.Rows.Add(2, 1, "Fanta")
        ObjHijo.Rows.Add(3, 1, "7up")
        ObjHijo.Rows.Add(4, 2, "Soda")
        ObjHijo.Rows.Add(5, 2, "Field")
        ObjHijo.Rows.Add(6, 2, "Charada")
        ObjHijo.Rows.Add(7, 3, "Manzana")
        ObjHijo.Rows.Add(8, 3, "Maracuya")
        ObjHijo.Rows.Add(9, 3, "Papaya")

        Dim ObjDataSet As New DataSet
        ObjDataSet.Tables.Add(ObjPadre.Copy)
        ObjDataSet.Tables(0).TableName = "Padre"
        ObjDataSet.Tables.Add(ObjHijo.Copy)
        ObjDataSet.Tables(1).TableName = "Hijo"

        Me.DgvPadre.DataSource = ObjDataSet.Tables("Padre")
        Me.DgvHijo.DataSource = ObjDataSet.Tables("Hijo")

        ObjDataSet.Relations.Add("Completo", ObjDataSet.Tables("Padre").Columns("IdPadre"), ObjDataSet.Tables("Hijo").Columns("IdPadre"))

        Me.DgvCompleto.DataSource = ObjDataSet.Tables("Padre") ' << DATAGRIDVIEW NO FUNCIONA
        Me.DataGrid1.DataSource = ObjDataSet.Tables("Padre")   ' << DATAGRID SI FUNCIONA

mil gracias...