Opdel tekststreng

Altså i 4 tekstbokse ????
elller en listbox ???? eller hur ?

Jeg kan ikke helt huske Visual Basic, men findes der ikke en kommando hvor du kan replace \", \" med chr(13) + chr(10)?

Lidt quick and dirty, men det skulle virke

Det skal indsættes i 1 tekstboks.

altså med return efter navn og adresse osv. ?
og den som corex hentyder til hedder : replace(text1.txt,\", \", chr(13)+chr(10)) !!!

hvor text1.text er den streng der skal replaces i .

og der skulle selvfølgelig stå :
replace(text1.text,\", \", chr(13)+chr(10))

men hvorfor chr(10) corex ?????

Som sagt kan jeg ikke huske meget om VB. Det er meget lang tid siden at jeg rodede med det. Men...

chr(13) = ny linie.
chr(10) = til start af linie.

Er det mig der er blevet for gammel eller .... :-)

Der kommer følgende fejlmeddelelse:
Sub of Function not defined

Det dur vist heller ikke helt, da man ikke kan have returns i et text felt.....
Du må vist ty til en listbox.

Hvordan kommer modtageren ind i teksboxen?
Skriver du den selv eller kommer det fra en fil?
Hvis modtageren kommer fra en fil gør du følgende:

Dim navn, adresse, adresse1, postnrby As String
Open \"Filnavn\" For Input As #1
Input #1, navn, adresse, adresse1, postnrby
Close #1

Nu er de delt i hver sin variabel, og du kan gøre med dem havd du vil. Er de flere modtagere i filen må du jo gentage processen til du har fået dem alle.

corex:> Det er ikke dig der er gammel ;-) vbCrLf = Chr(13) + Chr(10) = Ny linie+Til start af linien

Selve modtageren kommer fra en listbox. Man klikke på en modtager og modtageren sættes over i en textbox som navn, adresse, adresse1, postnrBy.
Skal sættes ind med linieskift.

Det skal så lige siges til både corex og kasseper at det kun er fra VB 6.0 at Replace() eksisterer DERFOR tror jeg at mite får en fejl da han/hun sikkert bruger < 6.0

kasseper:> du kan sagtens have linieskift i en textbox hvis bare du sætter dens MultiLine property til True

mite:> Så du vil have noget a\'la:

Private Sub List1_Click()
  Text1.Text = Text1.Text & vbCrLf & List1.Text
End Sub

??

Eller hvordan skal det virke?

OK, så er den vist på plads...
Kan du bruge Instr, Left og Right i VB 6.0 ?????

Jeg fik faktisk de vise ord fra tdaugaard. Idet jeg bruger VB 5.0 så meldes fejl, men bruges VB 6.0 så virker som kasseper har skrevet. Tak for det.

Øhhhh OK.

kasseper:> Ja, ja .. InStr, Left, Right & Mid kan bruges helt tilbage i VB 1 for DOS. InStrRev kom dog også først i 6\'eren mener jeg.

ok, så kunne det jo med lidt håndarbejde laves til vb 5.0 også....

kasseper:> ork ja .. der har jeg \"været\" også i Vb 6.0 inden jeg fandt ud af at Replace() og InStrRev fandtes