Visual Basic - colocar en caja de texto, ultimo id guardado en tabla de base de datos acces

Private Sub cmdGuardar_Click()

Dim tbl As New ADODB.Recordset

tbl.Open "Select *From Remision", CN, adOpenDynamic, adLockOptimistic

tbl.AddNew

    tbl("procedencia") = txtProcedencia.Text

    tbl("Destino") = cboDestino.Text

    tbl("Remitente") = txtRemitente.Text

    tbl("Consignatario") = txtConsignatario.Text

    tbl("Servicio") = cboServicio.Text

    tbl("Fecha") = txtFecha.Text

    tbl("Importe") = txtImporte.Text

    tbl("Cantidad") = txtCantidad.Text

    tbl("Descripcion") = txtDescripcion.Text

    tbl("Contiene") = txtContiene.Text

    tbl("Peso") = txtPeso.Text

    tbl("Letra_Importe") = txtLetraImporte.Text

    tbl("Recibio_Transporte") = txtRecibio.Text

tbl.Update

cmdImprimir.Enabled = True

//en esta parte asignare a una caja de texto del formulario este ultimo registro agregado, el campo es autonumerico//

End Sub