Listbox[RESUELTO]

[ind3t3ctabl3]

Hola aqui de nuevo molestando quisiera saber si un archivo de texto como un notepad c puede cargar a un listbox como si fuera un ritchtexbox en su evento .load se puede cargar  cual quier fichero .txt o los que les establescas se puede hacer lo mismo con un listbox?

Código (vb) [Seleccionar] Expandir


Option Explicit
Const FILTRO_EXTENSIONES As String = "Archivos de texto (txt)|*.txt|" & _
                                    "Rich Text Formato (RTF)|*.rtf|" & _
                                    "Archivos INI|*.ini|Archivos HTML|" & _
                                     "*.htm|Todos los archivos|*.*"

Private Sub abrir_Click()
    With CommonDialog1
        .DialogTitle = "Abrir Archivo"
        .Filter = FILTRO_EXTENSIONES
        .ShowOpen
        If .FileName = "" Then Exit Sub
        RichTextBox1.LoadFile .FileName
    End With
End Sub

se puede hacer lo mismo pero con un listbox?

[seba123neo]

adaptalo a lo que queres...

Código (vb) [Seleccionar] Expandir



Option Explicit

Private Sub Command1_Click()

    Dim vArchivo As String
    Dim i As Integer
    Dim vLinea As String
   
    vArchivo = App.Path & "\archivo.txt"
   
    i = FreeFile
   
    Open vArchivo For Input As i
   
    Do While Not EOF(i)
        Line Input #i, vLinea
        List1.AddItem vLinea
    Loop
   
    Close #i
End Sub


otra forma es cargar todo el archivo directamente y con un Split() ir añadiendo las lineas.

Código (vb) [Seleccionar] Expandir

Option Explicit

Private Sub Form_Load()
    Dim vLineas() As String
    Dim i As Integer
    Dim vArchivo As Integer
   
    vArchivo = FreeFile

    Open "C:\archivo.txt" For Binary Access Read As #vArchivo
        vLineas = Split(Input(LOF(vArchivo), vArchivo), vbNewLine)
        For i = 0 To UBound(vLineas)
            List1.AddItem vLineas(i)
        Next i
    Close #vArchivo
End Sub

[ind3t3ctabl3]

wow muchas gracias amigo estoy muy agradecido men saludos

[N@5h]

disculpa que habra dps de tanto un tema...

en visual studio como seria??

para abrir un txt en un listbox....

haciendo clic en un boton y q salga biste el buscar como cuando queremos adjuntar una imagen...

[Danyfirex]

Visual Studio? 

para que lenguaje  (Visual C++, Visual C#, Visual J#, y Visual Basic .NET)


No revivas el tema. Puedes Crear uno en la sección respectiva.

Saludos

[N@5h]

visual basic. net

perdon voy a crear un nuevo tema... pero como ai taba el codigo pense q era mas facil ... pq en windows 7 no puedo instalar el 6 que funcione correctamente...

desde ya mil gracias...