Skip to main content

Hola chicos me podrían ayudar?? EstoyEstoy realizando una agenda en visual basic VB.Net.net, ya Ya tengo casi todo listo, pero hay algo en dondeuna parte para la que necesito ayuda, necesito.

Me gustaría que al darle click, al hacer clic en el botón SiguienteSiguiente, se muestremostraran en los TextBox los datos de un contacto guardado del datagridviewalmacenado en los textboxel DataGridView y cuandosi se le vuelvavuelve a dar click que muestreclickear el siguiente y al darle al botón anterior se muestre el de atrás, alguien me podría ayudar por favor??..se mostraran los datos del siguiente. Lo mismo para el botón Atrás.

AquiA continuación, el codigocódigo desarrollado hasta ahora:

   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

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 en los textbox 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

Estoy realizando una agenda en VB.Net. Ya tengo casi todo listo, pero hay una parte para la que necesito ayuda.

Me gustaría que, al hacer clic en el botón Siguiente, se mostraran en los TextBox los datos de un contacto almacenado en el DataGridView y si se vuelve a clickear el botón, se mostraran los datos del siguiente. Lo mismo para el botón Atrás.

A continuación, el código desarrollado hasta ahora:

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
etiquetas editadas
Enlace
gbianchi
  • 20.6k
  • 13
  • 40
  • 60
se añadieron 15 caracteres en el cuerpo
Origen Enlace

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 en los textbox 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??....

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??....

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 en los textbox 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??....

Origen Enlace
Loading