Imprimir Página - [DUDA] ComboBox y su lista

Título: [DUDA] ComboBox y su lista
Publicado por: Enemy en 4 Junio 2009, 05:44 am

Buenas, estaba empezando un proyecto en VB que consiste en una lista desplegable que al seleccionar una de sus opciones, esta haga aparecer en el textbox un determinado codigo que yo le asigne a cada una.

Por ejemplo si una de las opciones dice: "Deshabilitar el Administrador de tareas" yo al seleccionarla quiero que esa opción suelte en un TextBox el codigo necesario para deshabilitar el adm de tareas que sera en VBS pero eso no importa. Mi duda es.. ¿¿como debo hacer para asignarle un determinado texto (que en este caso sera un trozo de cod VBS) a las opciones de la ComboBox??

como debo hacer para que al seleccionar N opcion, que escriba en la textbox un determinado texto?

Agradeceria cualquier aporte.

Título: Re: [DUDA] ComboBox y su lista
Publicado por: DarkMatrix en 4 Junio 2009, 06:03 am

usa el evento click del combobox, asigna un code espesifico segun el texto seleccionado

Título: Re: [DUDA] ComboBox y su lista
Publicado por: Enemy en 4 Junio 2009, 06:21 am

Cita de: DarkMatrix en 4 Junio 2009, 06:03 am

usa el evento click del combobox, asigna un code espesifico segun el texto seleccionado

Claro, esa es la idea. Ahora, como seria en lenguaje VB ? pero lo estoy haciendo ocn el evento "Change".

Código:

Private Sub Combo1_Change()
Combo1.Locked = False
Seleccion = Combo1.listIndex                 'Obtiene el numero de orden del elemento seleccionado
If seleccion = 2 then "COPIAR AL TEXTBOX"
End Sub

pero creo que deberia declarar antes las variables de los numeros.. o sea

Código:

Private Sub Combo1_Change()
1 = Me voy a jugar al futbol
2 = Voy a correr
3 = Bla bla bla                                       'etc...
Combo1.Locked = False
Seleccion = Combo1.listIndex                 'Obtiene el numero de orden del elemento seleccionado
If seleccion = 2 then "COPIAR AL TEXTBOX"
End Sub

xDD no tuve que haber dejado el VB ahora no me acuerdo nada xD ..... :-(

o debo usar el "VARIABLE.Combo1.text" ??

Título: Re: [DUDA] ComboBox y su lista
Publicado por: DarkMatrix en 4 Junio 2009, 06:28 am

simplemente haz esto, suponte que tienes estos elementos en el combobox:

Item1
Item2
Item3

el codigo seria haci:

Código

Private Sub Combo1_Click()
 
    Select Case Combo1.Text
        Case Is = "Item1"
            MsgBox " Escogiste el Item 1"
        Case Is = "Item2"
            MsgBox " Escogiste el Item 2"
        Case Is = "Item3"
            MsgBox " Escogiste el Item 3"
    End Select
 
End Sub

Edito: Habia copiado y pegado y no habia acomodado xD!

Título: Re: [DUDA] ComboBox y su lista
Publicado por: Enemy en 4 Junio 2009, 16:07 pm

Estas seguo que es asi?? Yo sigo leyendo otros tutos pero nada! >:(

no sera con IF?

Título: Re: [DUDA] ComboBox y su lista
Publicado por: Spider-Net en 4 Junio 2009, 16:14 pm

Lo puedes hacer con if o con Select case, lo mismo da xD

No hay una forma única de hacer las cosas.
Pero si hay varias opciones como aquí es más práctico usar el Select Case no crees?

Título: Re: [DUDA] ComboBox y su lista
Publicado por: Dessa en 4 Junio 2009, 16:26 pm

No estaras usando el evento Change en lugar del click ?, el code va en el click

Título: Re: [DUDA] ComboBox y su lista
Publicado por: Dessa en 4 Junio 2009, 17:05 pm

Código:


Private Sub Combo1_Click()
    Select Case Combo1.ListIndex
        Case Is = 0
            MsgBox " Escogiste el Item 1"
        Case Is = 1
            MsgBox " Escogiste el Item 2"
        Case Is = 2
            MsgBox " Escogiste el Item 3"
        Case Is = 3
            MsgBox " Escogiste el Item 3"
    End Select
End Sub

Private Sub Form_Load()
Combo1.AddItem "1"
Combo1.AddItem "2"
Combo1.AddItem "3"
Combo1.AddItem "4"
End Sub

Título: Re: [DUDA] ComboBox y su lista
Publicado por: Enemy en 5 Junio 2009, 04:34 am

Bien, ya correji un par de cosas y sigo leyendo del libro "Visual Basic" Guia del estudiante Cap 1 al 5. pero hay muchas cosas que no las explica este libro y bueno para eso esta el foro para ayudarme a aclarar mis dudas, estoy leyendo ahora los aportes de NekroByte y bueno, vere que sale.

Voy a ver si puedo avanzar lo mas que pueda sin hacer tantas preguntas asi no parezco tan pesado y cuando tenga mas dudas las posteare.

gracias darkmatrix por la iniciativa, spider por hacerme entrar en razon y gracias dessa por corregirme, estaba usando el evento "change" y bueno ahora esta en el click.

PD: Los tendre en cuenta en el "gracias a" del programa.

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Enemy en 4 Junio 2009, 05:44 am