Hej...har suttit här och knopat och knopat...men får inte ihop det, jag undrar hur man får en fil typ test.txt att visas i en listbox.
jag vill att filen skall öppnas så att innehållet visas i en listbox, Jag får det att fungerar när jag har en textbox men inte en listbox.
Följande kod använder jag då.

Private Sub Form_Load()
Dim FileNum As Integer
Dim strFil As String
FileNum = FreeFile
Open App.Path & "\test.txt" For Input As FileNum
While Not EOF(FileNum)
Input #FileNum, strFil
Text1.Text = Text1.Text & strFil & vbCrLf
Wend
Close #FileNum
End Sub

Hej
Så här bör du göra

Private Sub Form_Load()
Dim FileNum As Long
Dim strFil As String
FileNum = FreeFile
Open App.Path & "\test.txt" For Input As FileNum
Do Until EOF(FileNum)
Line Input #FileNum, strFil
List1.AddItem strFil
Loop
Close #FileNum
End Sub

/Sven

Tackar så mycket Sven-Pon.
Bara en lite fråga, kan man inte få typ MultiLine på en Listbox?
Detta kan man ju få på en Textbox! Tacksam för svar.

Hej
Du kan ju betrakta en Listbox som en TextBox med multiline = True
Men jag fårstår att du menar att varje List1.Text, i sig skall ha Multiline.

Det går inte.

/Sven