none
ComboBox y campo de una base de datos RRS feed

  • Pregunta

  • Hola a todos

    Solicito ayuda para el siguiente problema.

    Tengo una base de datos con tres campos de texto, dos de ellos son abiertos (se puede ingresar cualquier valor), pero en el tercero solo se admiten valores de un listado. Ese listado lo tengo en un combobox.

    Al momento de hacer un registro nuevo, selecciono del combobox el valor adecuado, lo paso al textbox relacionado con ese campo y lo agrego a la base. 

    El problema lo tengo al momento de modificar un registro. En este caso el valor ya está en el texbox. No acierto hacer la búsqueda de ese valor en la colección del combobox para que se vea y se decida a cambiarlo o no.

    Aclaro que para el operador solo estará visible el combo y no el texbox respectivo

    Gracias


    Pedro López

    martes, 9 de junio de 2015 20:40

Respuestas

  • Hola,

    ¿Pero para que copias el valor en el Textbox (que no ve el usuario) si podrías enviar el valor seleccionado del ComboBox?

    Dim ValorSeleccionado as String = comboBox1.SelectedItem.ToString()

    Ahora, apuntando a tu pregunta, para seleccionar un valor en el comboBox puedes hacer lo siguiente:

    Dim Valor As String = "Juan"
    comboBox1.SelectedItem = Valor


    Si la solución propuesta atendió su consulta no olvide marcarla como respuesta.

    Willams Morales
    Arequipa - PERÚ

    • Marcado como respuesta Pearloga martes, 9 de junio de 2015 21:06
    martes, 9 de junio de 2015 20:48

Todas las respuestas

  • Hola Pearloga podrías explicar un poco mas detallada, por que no logro entender muy bien cual es tu duda (Si muestras una imagen seria mejor).

    Espero haberte ayudado.

    martes, 9 de junio de 2015 20:44
  • Hola,

    ¿Pero para que copias el valor en el Textbox (que no ve el usuario) si podrías enviar el valor seleccionado del ComboBox?

    Dim ValorSeleccionado as String = comboBox1.SelectedItem.ToString()

    Ahora, apuntando a tu pregunta, para seleccionar un valor en el comboBox puedes hacer lo siguiente:

    Dim Valor As String = "Juan"
    comboBox1.SelectedItem = Valor


    Si la solución propuesta atendió su consulta no olvide marcarla como respuesta.

    Willams Morales
    Arequipa - PERÚ

    • Marcado como respuesta Pearloga martes, 9 de junio de 2015 21:06
    martes, 9 de junio de 2015 20:48
  • Hola Pearloga; no se porque el textbox si lo que quieres es buscar un registro de un listado en un combo box prueba de la siguiente forma:

    Dim ingresado As Integer = -1
            For a = 0 To ComboBox1.Items.Count
                If ComboBox1.Text = ComboBox1.Items(a) Then
                    ingresado = a
                End If
            Next
    
            Dim modificar As String
            modificar = ComboBox1.Items(ingresado).ToString
            'el comando de seleccion del registro de base de datos sería algo asi.
            Dim cmd As String = "update TABLA SET(ultimafila) VALUES ('" & modificar & "')"
        End Sub

    Y SI QUIERES SEGUIR CON EL TEXTBOX CAMBIA EL COMBOBOX1.TEXT por el textboxtuyo.text

    avisa si funciona


    martes, 9 de junio de 2015 20:54
  • Gracias a todos.

    La que me valió fue la de Morales.

    Respondo a algunas preguntas.

    El que está enlazado a la bd es el textbox, si bien no lo muestro al operador es el que vale.

    El combo solo  ofrece opciones obligatorias con valores a seleccionar para ingresar a ese campo. los valores del combo son tomados de la colección llenada en tiempo de diseño.

    Cuando selecciono modificar un registro tengo esto (como me dijo Morales)

    ComboBox1.Text = "" rem lo vacio por las dudas
    ComboBox1.SelectedItem = RubroTextBox.Text 

    Es decir selecciono de los valores fijos del combo aquel que coincide con el que ya está en la BD y por consiguiente en RubrotextVox.text. El operador lo ve en el combo y sabe lo que hay y decide modificarlo o  no.

    Cuando voy a guardar el registro (tanto sea un registro nuevo como uno modificado) tengo esto

      ComboBox1.SelectAll()
     RubroTextBox.Text = ComboBox1.SelectedText

    y lo guardo

    gracias


    Pedro López

    martes, 9 de junio de 2015 21:51