Ayuda a visualizar un .TXT en un ListBox en Visual Basic 6.

Iniciado por ELGRANSOLRAC, 3 Agosto 2005, 19:25 PM

0 Miembros y 2 Visitantes están viendo este tema.

ELGRANSOLRAC

Necesito saber como visualizar un Archivo TXT en un listbox en codigo Visual Basic 6.
cuando se visualice el TXT en el Listbox cuando aprete a un Command1,comprueve automatico los nombres que aparecen en el Listbox con el nombre que hay en un  TextBox.
Gracias a todo el que pueda solucionarme este problemilla Gracias a todos....

soplo

Macho tu sabrás lo que pides porque yo no lo entiendo.l

tienes un listbox y un command eso si lo he entendido. El resto tu sabrás.
Callar es asentir ¡No te dejes llevar!

ELGRANSOLRAC

Perdona si me explicado mal....
Mira abrimos un formulario ponemos un Listbox un command y un Textbox, en el TextBox escribimos un Nombre Por ejemplo Luis,Cuando el Form se habra el listBox tiene que cargar la informacion de un Archivo txt el cual apareceria en el listbox asi:
pepe
jose
antonio
Luis
Carlos

-Cuando el Listbox visualice el TXT de esa forma al apretar al Command compare todos los Nombres que aparecen en el Listbox co el nombre que ahi en el TextBox o sea Luis.

Espero haberme explicado mejor ahora Gracias soplo....

goodbye

#3
Lo primero y lo segundo

Private Sub Form_Load()
    On Error GoTo line1
    Open "c:\Lista.txt" For Input As #1
    Dim nombre As String
    While Not EOF(1)
        Line Input #1, nombre
        List1.AddItem nombre
    Wend
    Close
    Exit Sub
line1:
    MsgBox Err.Description, vbCritical, "Error " & Err.Number
End Sub

Private Sub Command1_Click()
    Dim i, V As Boolean
    For i = 0 To List1.ListCount - 1
        If UCase(Text1) = UCase(List1.List(i)) Then V = True
    Next
    If V = True Then
        MsgBox "El nombre '" & Text1 & "' aparece en la lista"
    Else
        MsgBox "'" & Text1 & "' no aparece en la lista"
    End If
End Sub


Saludos.
Al lado de la dificultad está la facilidad.
Cambiad de placeres, pero no cambies de amigos.
Aceptar un favor de un amigo, es hacerle otro.

ELGRANSOLRAC

Muchas Gracias es eso lo que estaba buscando muchisimas gracias es perfecto GRACIAS....