listbox

[lokotronX]

Hola a toda la comunidad
soy nuevo en esto de visual y estoy aprendiendo desde cero he leido manuales y tutoriales pero kisiera saber si aguien de aki me podria decir como guardar el contenido de un listbox en un documento de texto, se que para muchos esto es de risa pero yo soy novato, ojala me pudieran ayudar, salu2

[HaDeS, -]

Intenta con esto:

Código (vb) [Seleccionar] Expandir


Private Sub Command1_Click()
Dim Canal% 'as integer
Dim x$
For i = 0 To List1.ListCount - 1 'recorremos cada elemento del list
    x = x & vbCrLf & List1.List(i) 'a la variable x le metemos el contenido de cada valor de la lista
Next i
Canal = FreeFile 'abrimos canal
Open "c:\lista.txt" For Output As Canal 'abrimos el archivo en modo de escritura
Print #canal, x 'escribimos el contenido
Close #Canal 'cerramos el canal
End Sub


Si lo que queres hacer es guardar el contenido solo de un elemento:

Código (vb) [Seleccionar] Expandir


Private Sub Command1_Click()
Dim Canal% 'as integer
Dim x$
x =  List1.List(i) 'a la variable x le metemos el contenido del valor escogido en la lista, i es la fila que vamos a guardar
Canal = FreeFile 'abrimos canal
Open "c:\lista.txt" For Output As Canal 'abrimos el archivo en modo de escritura
Print #canal, x 'escribimos el contenido
Close #Canal 'cerramos el canal
End Sub


Saludos!

[lokotronX]

Gracias hades, me sirvio muy bien, te lo agradezco mucho