me e rendido de recuperar el valor que devuelve la indercion XD, y lo e echo de estamanera espero que alguien mas les siva.
Cita: Private Sub btnguardarp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnguardarp.Click
Proc.Visible = True
Dim paquete As String = txtpaquete.Text
Dim act As Boolean = True
Dim pre As Decimal = 0
'se inseta un nuevo paquete
Dim pac As Integer = conPaquetes.insPaquete(pre, act, paquete)' inserto
'consulta el id de la ultima inserción
Dim cd = conPaquetes.conidPaquete()
Dim id As Integer = Convert.ToString(cd.Rows(0)("idpaquete"))
'Actulisamos el datagrit
Me.conPaquetes.Fill(Me.PollosDataSet.Paquetes)
idpaq.Text = Convert.ToString(id)
End Sub