elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Trabajo con listbox
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Trabajo con listbox  (Leído 935 veces)
Tomas1982

Desconectado Desconectado

Mensajes: 48



Ver Perfil
Trabajo con listbox
« en: 31 Agosto 2016, 23:39 »

Disculpen la pregunta el problema es que soy novato en este lenguaje,  estoy tratando de capturar los item de un listbox y pasarlo a una variable pero no lo e logrado, e encontrado algunas cosas en la web pero me dan error.
Esto es algo de lo que e encontrado:
Código
  1. Private Sub Command1_Click()
  2. Dim i As Integer
  3. For i = 0 To List1.ListCount - 1
  4. MsgBox List1.List(i)
  5. Next i
  6. End Sub
  7.  


En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.709



Ver Perfil
Re: Trabajo con listbox
« Respuesta #1 en: 1 Septiembre 2016, 00:04 »

Hola

El código que has mostrado es para VB6, no para VB.NET. Por favor, expecifica que lenguaje estás utilizando. Y cuando formules una pregunta de programación sobre un error, intenta siempre mencionar de que error se trata... no somos magos y es una información esencial para poder ayudar al que necesita esa ayuda.

Un saludo!


« Última modificación: 1 Septiembre 2016, 00:06 por Eleкtro » En línea


Tomas1982

Desconectado Desconectado

Mensajes: 48



Ver Perfil
Re: Trabajo con listbox
« Respuesta #2 en: 1 Septiembre 2016, 00:15 »

Disculpa, como les dije soy novato en este lenguaje, estoy usando VB.net.  Ya logre quitar el error, pero como lo paso el contenido del listbox a la variable: Esto es lo que tengo...
Código
  1. Dim Dr As String
  2. FolderBrowserDialog1.ShowDialog()
  3. TextBox1.Text = FolderBrowserDialog1.SelectedPath
  4. Dr = FolderBrowserDialog1.SelectedPath
  5. For Each arq As String In Directory.GetFiles(Dr, "*.*", SearchOption.AllDirectories)
  6. ListBox1.Items.Add(arq)
  7. Next
  8. Dim i As Integer
  9. For i = 0 To ListBox1.Items.Count - 1
  10. MsgBox(ListBox1.Items(i))
  11. Next i
  12.  
« Última modificación: 1 Septiembre 2016, 00:21 por Tomas1982 » En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.709



Ver Perfil
Re: Trabajo con listbox
« Respuesta #3 en: 1 Septiembre 2016, 00:29 »

como lo paso el contenido del listbox a la variable:

Deduzco que despues de agregar los nombres de los archivos al ListBox pretendes almacenarlos en otro objeto, o al menos eso es lo que me das a entender con la pregunta que has hecho, pero por sentido común el procedimiento debe realizarse al revés, primero trata de almacenar la información obtenida la en un contenedor (en un Array o en una colección de tipo List) y eso lo usarás para representar la información a mostrar en el ListBox.

Puedes hacerlo de la siguiente manera:
Código
  1. Dim dirpath As String = Environment.CurrentDirectory
  2. Dim filepaths As String() = Directory.GetFiles(dirpath, "*", SearchOption.AllDirectories)
  3.  
  4. Me.ListBox1.DataSource = filepaths
  5.  
  6. ' For Each filepath As String In filepaths
  7. '     Console.WriteLine(filepath)
  8. ' Next filepath

Saludos!
« Última modificación: 1 Septiembre 2016, 00:35 por Eleкtro » En línea


Tomas1982

Desconectado Desconectado

Mensajes: 48



Ver Perfil
Re: Trabajo con listbox
« Respuesta #4 en: 1 Septiembre 2016, 01:03 »

Gracias nuevamente, me sirvió lo que me diste   
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines