Text break

[mikeFin]

Hello!

Here a procedure I have:

- - -
Sub naming(shpObj As Visio.Shape, txt As String)

ActiveWindow.Selection(1).text = ActiveWindow.Selection(1).text & txt

End Sub
- - -

I would like to have line break between both strings.
How could I do that?

I just know that with "vbCr" ...

ActiveWindow.Selection(1).text = ActiveWindow.Selection(1).text & vbCr &txt

.... I get a whitespace between the strings.

Thanks !

 

[mikeFin]

I founf the answer...

Chr(10)

 

[mikeFin]

I found the answer...

Chr(10)


(sorry this is a double post, but my previous answer didn't show up)

 

[JuneTheSecond]

And, text & CHAR(13) & CHAR(10) & txt
means carriage return and line feed.

 

[John... Visio MVP]

And, text & CHAR(13) & CHAR(10) & txt
means carriage return and line feed.
--
JuneTheSecond

Now, visual calculation is more visual.
http://www.geocities.jp/visualcalculation/english/index.html

or VBCrLf.

John...Visio MVP