cargar un datagridview con el ultimo registro guardado en sql

Question

buenas tardes amigos!! recurro a uds para ver si pueden orientarme a cargar un datagridview con el ultimo registro guardado en sql.tengo el siguiente procedimiento almacenado:

 if OBJECT_ID ('Ultimo_Atleta_x_Competencia') IS not null
drop proc Ultimo_Atleta_x_Competencia
go

create proc Ultimo_Atleta_x_Competencia
as
begin
 SELECT
  dbo.Atleta_X_Competencia.Id_Atleta_X_Competencia,
 dbo.Atleta_X_Competencia.Id_Atleta,
 dbo.Atleta.Apellido_Atleta, dbo.Atleta.Dorsal,
  dbo.Atleta_X_Competencia.Id_Competencia,
  dbo.Competencia.Nombre_Competencia,
  dbo.Competencia.Hora_Inicio,
   dbo.Atleta_X_Competencia.Id_Resultados_X_Competencia,
    dbo.Resultados_X_Competencia.Posicion,
    dbo.Atleta_X_Competencia.Id_Resultados_X_Atleta,
    dbo.Resultados_X_Atleta.Descripcion, dbo.Resultados_X_Atleta.Valor

 FROM Atleta
 INNER JOIN dbo.Atleta_X_Competencia
ON dbo.Atleta.Id_Atleta = dbo.Atleta_X_Competencia.Id_Atleta
 INNER JOIN dbo.Resultados_X_Atleta
  ON dbo.Atleta_X_Competencia.Id_Resultados_X_Atleta = dbo.Resultados_X_Atleta.Id_Resultados_X_Atleta
  INNER JOIN  dbo.Resultados_X_Competencia
  ON dbo.Atleta_X_Competencia.Id_Resultados_X_Competencia = dbo.Resultados_X_Competencia.Id_Resultados_X_Competencia
  INNER JOIN dbo.Competencia
  ON dbo.Resultados_X_Competencia.Id_Competencia = dbo.Competencia.Id_Competencia
                     
WHERE Atleta_X_Competencia.Id_Competencia=(SELECT MAX(Id_Competencia) FROM Competencia)
 end
       go

En la capa de datos tengo:

Dim objcon As New conexion
    Dim cn As SqlConnection
    Dim da As SqlDataAdapter
    Dim cmd As SqlCommand

  Public Function Ultimo_Atleta_x_Competencia() As DataSet
        Dim ds As New DataSet
        cn = objcon.Conectar
        da = New SqlDataAdapter("Ultimo_Atleta_x_Competencia", cn)
        da.Fill(ds, "Ultima Atleta por Competencia")
        Return ds
        ds.Dispose()
        da.Dispose()
        cn.Dispose()
    End Function

En la capa de negocio tengo:

Dim objcompetencia As New DAOAtletas_x_Competencia

 Public Function Ultimo_Atleta_x_Competencia() As DataSet
        Return objcompetencia.Ultimo_Atleta_x_Competencia
    End Function

En la capa entidad tengo:

    Private _Id_atleta_x_competencia As Integer
    Public Property Id_atleta_x_competencia() As Integer
        Get
            Return _Id_atleta_x_competencia
        End Get
        Set(value As Integer)
            _Id_atleta_x_competencia = value
        End Set
    End Property

   

    Private _id_competencia As Integer
    Public Property id_competencia() As Integer
        Get
            Return _id_competencia
        End Get
        Set(value As Integer)
            _id_competencia = value
        End Set
    End Property

    Private _id_atleta As Integer
    Public Property id_atleta() As Integer
        Get
            Return _id_atleta
        End Get
        Set(value As Integer)
            _id_atleta = value
        End Set
    End Property

    Private _id_resultado_atleta As Integer
    Public Property id_resultado_atleta() As Integer
        Get
            Return _id_resultado_atleta
        End Get
        Set(value As Integer)
            _id_resultado_atleta = value
        End Set
    End Property

    Private _id_resultado_competencia As Integer
    Public Property id_resultado_competencia() As Integer
        Get
            Return _id_resultado_competencia
        End Get
        Set(value As Integer)
            _id_resultado_competencia = value
        End Set
    End Property

(Solo los id de las tablas relacionadas)

En la capa presentacion necesitaria llenar el datagridview:

Dorsal    Apellido   Club   Descripcion   Valor         Posicion      

23          Marquez  CAT     Tiempo        02:20:33         1

.....            ......       ......     ........           ..............         ....

.....            ......       ......     ........           ..............         ....

los Id de cada tabla los guardo en textbox en el mismo formulario.

gracias por su ayuda!!!!!

---

valeria heredia