Hola chicos me podrían ayudar?? Estoy realizando una agenda en visual basic .net, ya tengo casi todo listo pero hay algo en donde necesito ayuda, necesito que al darle click al botón Siguiente se muestre un contacto guardado del datagridview y cuando se le vuelva a dar click que muestre el siguiente y al darle al botón anterior se muestre el de atrás, alguien me podría ayudar por favor??.... Aqui el codigo Public Class Form1 'Subrutina privada para Salir del Formulario Private Sub BotonSalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BotonSalir.Click 'Finalizar Ejecucion End End Sub 'Subrutina Privada para Mostrar u ocultar Lista de Contacto Private Sub BotonMostrarContactos_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BotonMostrarContactos.Click 'Ponemos una condicion de que sí la lista de contacto está oculto, está se muestre If Agenda.Visible = False Then BotonMostrarContactos.Text = "Ocultar Contactos" Agenda.Visible = True 'De lo contrario se oculte Else BotonMostrarContactos.Text = "Mostrar Contactos" Agenda.Visible = False End If End Sub 'Subrutina Privada para Habilitar y vaciar los textbox Private Sub BotonNuevo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BotonNuevo.Click 'Los textbox Pasan de Deshabilitado (False) a Habilitado (True) TextBoxNombre.Enabled = True TextBoxTelefono.Enabled = True TextBoxDireccion.Enabled = True 'Vaciar Textbox TextBoxNombre.Text = "" TextBoxTelefono.Text = "" TextBoxDireccion.Text = "" End Sub 'Subrutina privada para Guardar Contacto Private Sub BotonGuardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BotonGuardar.Click 'Guardamos los valores de los texbox en una fila de la Agenda (DataGridView) Agenda.Rows.Add(TextBoxNombre.Text, TextBoxTelefono.Text, TextBoxDireccion.Text) MsgBox("Guardado Correctamente") 'Deshabilitamos los Textbox TextBoxNombre.Enabled = False TextBoxTelefono.Enabled = False TextBoxDireccion.Enabled = False 'y vaciamos los Textbox TextBoxNombre.Text = "" TextBoxTelefono.Text = "" TextBoxDireccion.Text = "" End Sub 'Subrutina privada para Eliminar Contacto Private Sub BotonEliminar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BotonEliminar.Click 'Le decimos que elimine una fila seleccionada de la Agenda (DataGridView) Agenda.Rows.Remove(Agenda.CurrentRow) End Sub Private Sub BotonSiguiente_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BotonSiguiente.Click End Sub End Class Aqui en form [![introducir la descripción de la imagen aquí][1]][1] [1]: https://i.sstatic.net/rkjPr.png