How to add text to RTF textbox at runtime?

[mel_flynn]

How do I add a series of data to a RTFtextbox at runtime?

e.g. of what I want
Name Address Age Salary

13/03/2002

John Creek hill 25 30,000
Mary Valley West 39 35,000

Total ===> 65,000
___________________________________________


Example of how I am trying to code it

rtb1.Font.Bold = True
rtb1.Font.Underline = True
rtb1.Text = "Name " & vbTab & "Addrress " & vbTab & "Age" & vbTab & " Salary

rtb1.Font.Bold = False
rtb1.Font.Underline = False
rtb1.Font.Italic = True
rtb1.text = Date()

rtb1.Font.Italic = False

For i = LBound(myArray) to UBound(myArray)
rtb1.Text = name(myArray) & vbTab & address(myArray) ........
next i
________________________________________________

I know when I do rtb1.Font.Underline = False I am setting this attribute False for the whole textbox, but how do I vary it.

Note:
My array is populated with data read for a file. The size of this file will vary but will generally be in excess of 2000 lines.

Hope someone can help.

[jacsoft]

Use the selstart

Like
rtf1.selstart = 10 'want to start at the 10 character
rtf1.sellength = 5 'take 5 characters
rtf1.selbold = True 'only make this 5 characters bold

Hope it helps

[vicros]

the formatting caps of the RTFBox refer to the currently selected (-->highlighted) parts of the text. Thus, you have to set SelStart and SelLength according to your requirements and then

with RTFBox1
  .SelStart=138         'Start Selection at Character 138)
  .SelLength=10        'Length of selected Substring=10
  .SelBold=True         'Make Selection Bold
  .SelUnderline=True 'Underline the stuff
end with

Same goes with Fontsize, Font, Color, Italics etc..

Then save everything using RTFBox1.Savefile "C:\FILENAME.RTF",0

Hope that finally helps, since this is your 3.attempt or so?

[mel_flynn]

My problem is I dont' know how many characters or lines there will be. I am reading the data from an external file, and looping through it until EOF is reached.

Forget it, I'll find another way around it.

Thanks anyway.

[vicros]

If you are reading data, like from a data base, and either the strings end with CRLF or you have some other possibility of identifying the end of a record, then you should be able to do your formatting line-by-line or string-by-string. You have to keep track of the number of characters already written, then you could set selstart and length accordingly.

Another workaround comes to mind (albeit a bit dirty):
Read your data, put a full record into another (small, temorary) RTFBox, do your formatting and add the contents to the final RTFBox. Just set .Visible to False and no one 'll ever find out.