🚀 go-pugleaf

W dniu 16.03.2023 o 13:56, Phantom pisze:
> Dzień dobry
> dotyczy: kod na wymuszanie nowej linii w raporcie
> Mam coś takiego:
> 
>      te = ""
>      te = te & "Otrzymują:" & Chr$(13) & Chr$(10)
>      te = te & "1 x aaa aaaaaa aaaaaa aaaaaa aaaaaa "  & Chr$(13) & Chr$(10)
>      te = te & "1 x bbbb bbbbbbbb bbbbb bbbbbb bbbb" & Chr$(13) & Chr$(10)
> 
> me.PoleOtrz = te
> 
> Jeżeli pole "poleOtrz" ma ograniczoną długość np 5cm to otrzymuję:
> Otrzymują:
> 1 x aaa aaaaaa aaaaaa aaaa
> aa aaaaaa
> 1 x bbbb bbbbbbbb bbbbb bb
> bbbb bbbb
> 
> Czy jest jakiś sposób aby uzyskać:
> Otrzymują:
> 1 x aaa aaaaaa aaaaaa aaaa
>        aa aaaaaa
> 1 x bbbb bbbbbbbb bbbbb bb
>        bbbb bbbb
> 
> czyli wymusić kilka spacji w nowej linii?

Moje pytanie:
Pole ma 5 cm szerokości, ale chyba to niewiele daje, bo zapewne nie 
wiesz ile wyrazów zmieści się w pierwszej linijce w polu tekstowym 
raportu, by dodawać spacje w drugiej linijce, a potem sprawdzać ile 
wyrazów zmieści się w następnej linijce itd.

Czyli Twoim problemem nie jest jak dodać spacje po Chr$(13) & Chr$(10),
bo spacje (tutaj 5 spacji) możesz dodać w następujący sposób:
vbNewLine & Space(5),
ale znalezienie miejsca podziału tekstu i ilości spacji w następnej 
linijce pola tekstowego raportu by tekst ładnie wyglądał.


-- 
Pozdrawiam
LX'yrs

-- 
Pozdrawiam
LX'yrs