[VB5] Caricare i nome dei file .txt in una combo

[vr-claudio]

Ciao carissimi iscritti
sto cercando di effettuare un progetto (in VB5), dove in un Form1 ho:
1)Text1
1)Text2
1)Command1 (chiamato SalvaTesto)
1)Command2 (chiamato CaricaNomi)
1)Combo1 (chiamata NomiFile)

Per quanto riguarda caricare il testo della Text1 e il nome del File nella Text2 sottoforma di .txt non ci sono problemi, infatti ho
effettuato questo codice nel Command1:

Private Sub SalvaTesto_Click()
Dim FileNum As Integer
Dim FileName As String
FileName = "C:\WINDOWS\Desktop\SaveTesto\Testo\" & Form1.Text2.Text & ".txt"

FileNum = FreeFile()

Dim strCL1 As String
strCL1 = Form1.Text1.Text
Open FileName For Output As #FileNum
Write #FileNum, strCL1
Close #FileNum
End Sub

Ma il problema inizia quando voglio caricare i nomi del File .txt nella Combo1 per poi visualizzare il testo nella Text1 cliccando sui nomi stessi.
Vi prego aiutatemi, grazie mille
vrc

[GudFella]

nello stesso modo in cui scrivi il file,
lo apri però in lettura (for Input) ed aggiungi il valore alla tua combo (combo.additem(valore))

[vr-claudio]

Ciao Carissimo
ti volevo ringraziare per la tua immediata risposta, ma potresti farmi un esempio come ho fatto io, scusa ma non sono un'esperto ma solo un piccolo appassionato
Grazie vrc

[GudFella]

in VB6

    Open file For Input Access Read Lock Read As #1
        Do While Not EOF(1)
            Line Input #1, str
            combo.AddItem str
        Loop
    Close #1

[alka]

Originariamente inviato da vr-claudio
Ciao carissimi iscritti
sto cercando di effettuare un progetto (in VB5), dove in un

Il linguaggio anche nel titolo della discussione, come da Regolamento.

Questo lo correggo io, ma non è la prima volta.

Ciao!