När jag läser in en textfil och väljer att lägga in raderna i en listbox med denna kod:

Open "c:\program\content.txt" For Input As #1
Do

Input #1, texten
List1.AddItem texten

Loop Until EOF(1)
Close #1

Då ger varje kommatecken ett radbyte. Hur förhindrar jag detta?

Det här funkar ju inte heller

texten = Replace(texten, Chr(44), "&#44")

:/

texten = Replace(texten, ",", " ") 'Det här ersätter alla komman med mellanslag

Är du säker på att det är komma "," och inte semikolon ";" ?
Om det är semikolon blir det så här
texten = Replace(texten, ";", " ")

Maria

Oki Emil nu kör Vi den hårda stilen , så här skall det se ut !
<code>
Dim Fnum As Long,txtLine As String
Fnum = FreeFile
Open "C:\Program\Content.txt" For Input As # Fnum
Do until EOF(Fnum)
Line Input fnum,txtLine
List1.AddItem txtLine
Loop
Close # Fnum
</code>