Avatar billede jensgram Nybegynder
15. marts 2003 - 09:22 Der er 2 kommentarer og
1 løsning

Skriv til fil uden linieskift

Hej eksperter

Jeg har følgende:

    Open cdl_dialog.FileName For Output As #1
        For i = 0 To lst_data.ListCount - 2 Step 1
            If i = 0 Then
                Print #1, lst_data.List(i)
            Else
                Print #1, "," & lst_data.List(i)
            End If
        Next i
    Close #1

Det virker næsten, men resultatet kan være:

10010010
,01101101
,11101101

Hvordan kan jeg undgå linieskiftene?

Jeg vil have dette:

10010010,01101101,11101101

Det er nemlig til en csv-fil!

Håber I kan hjælpe!
Avatar billede jensgram Nybegynder
15. marts 2003 - 09:23 #1
Jeg prøvede forresten med join(lst_data.list, ","), men det gav en fejl, med en parameter, der manglede...
Avatar billede knico Nybegynder
15. marts 2003 - 09:33 #2
Prøv at lave strengen først og så 'printe' den til filen:
For i = 0 To lst_data.ListCount - 2 Step 1
            If i = 0 Then
                Print #1, lst_data.List(i)
            Else
                str = str & lst_data.List(i) & ","
            End If
        Next i
og så print #1, str
Avatar billede jensgram Nybegynder
15. marts 2003 - 10:55 #3
Jeps - det kom jeg også i tanker om:

For i = 0 To lst_data.ListCount - 2 Step 1
            If i = 0 Then
                str = lst_data.List(i)
            Else
                str = str & lst_data.List(i) & ","
            End If
        Next i
og så print #1, str
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester