listbox

[yohannita]

hola

tengo un listbox con 2 columnas: empleado y departamento, solo se puede escoger 1 de la lista.... quiero hacer 1 condición que el escogido se vaya a tu textbox...... como le puedo hacer?? es decir, sacar solo la informaciòn del nombre del empleado y enviarlo a tu textbox..

tambien quiero poner un checkbox donde diga "todos" y me mande todos los nombres de los empleados que aparecen en la lista en un textbox separados por ";".... como lo puedo hacer??

gracias

[David]

Puedes usar la propiedad ListIndex (Elemento seleccionado) para extraer el empleado seleccionado.

Para colocar todos los elementos en un TextBox recorriendo todos los elementos de la lista con un bucle For.

P.S.: ¿Estás usando VBA de Excel? Por lo de las columnas en el ListBox.

[yohannita]

si de hecho si..... con un for poniendole el tope de la lista

Private Sub btn_enviar_Click()
If ck_all.Value = 0 Then
Correo.txtTo.Text = lst_signatures.SelectedItem & "@empresa.com.mx"

Else
for


Bueno tengo este codigo donde selecciono 1 empleado y perfectamente me hace el correo del mismo .....


cuando el valor de ck_all es 1 tengo que poner la condiciòn del for para hacer el ciclo desde 0 al tope de mi lista... el problema es que no recuerdo como hacerlo..!!
aparte ya estoy algo ciclada !!

[David]

Sería algo como:

Código PHP:

  For Looping = 1 To ListBox.ListCount - 1  
   

[yohannita]

He utilizado el listcount pero me dice que el metodo no es valido !!

[David]

¿Tienes certeza que es el ListBox el que estás usando? ¿No será un ListView? En ese caso sería:

Código PHP:

  ListView.ListItems.Count  
   

[yohannita]

Si tienes razon lo realice en un Listview... pero no kiero que me cuente la lista sino que m despliegue lo que dice en la lista

gracias

[moradazo]

Iniciado por yohannita

Si tienes razon lo realice en un Listview... pero no kiero que me cuente la lista sino que m despliegue lo que dice en la lista

gracias

Aca tienes para recorrer un listview y tomar los elementos de cada fila en sus respectivas columnas

Código:

Dim lvi As ListViewItem
   If ListView1.SelectedItems.Count = 0 Then Exit Sub
            For i As Integer = ListView1.SelectedItems.Count - 1 To 0 Step -1
                lvi = ListView1.Items.Add(Microsoft.VisualBasic.Right(line, Len(line) - iPos)) 'Columna derecha
                lvi.SubItems.Add(Microsoft.VisualBasic.Left(line, iPos))
            Next 'Columna izquierda 

End if

[yohannita]

Hola

Tengo el siguiente codigo:


If ck_all.Value = 1 Then

For looping = 0 To RReport.lst_signatures.ListItems.count - 1
Correo.txtTo.Text = RReport.lst_signatures.SelectedItem & "@empresa.com.mx" & ";"
looping = looping + 1
next

No me realiza el for... solo me hace la primera fila.... no me hace el conteo..!!

disculpen tantas preguntas pero soy novata !!
gracias

[David]

Debes poner ListView.ListItems(Looping) para que vaya recorriendo cada elemento del ListView.
Además, debes quitarle el Looping = Looping + 1 ya que es el bucle For el que se encarga de sumarle 1 a la variable.