Text in RichTextBox scrolls out of "sight" ...

[Joe HM]

Hello -

I have a GUI that uses a RichTextBox to output text. The problem is
that if this box ouput text while hidden behind another window, it is
blank when I bring it to the foreground. The text is there when I
click on the scroll button on the scrollbar but it seems to be scrolled
"up" all the way.

The following code is used to add new text to that box with a certain
color:

Dim lTextLength As Integer = aRichTextBox.Te xtLength()

' The following will append aString in aColor to the Text of the
' aRichTextBox.

aRichTextBox.Se lect(lTextLengt h, 0)

aRichTextBox.Se lectionColor = aColor
aRichTextBox.Se lectedText = aString

' This will set the cursor to the end of the text so that it
' scrolls and becomes visible.

aRichTextBox.Se lect(aRichTextB ox.TextLength() , 0)

The last line of code is something I added hoping it would show the
text.

Is this a problem with the RichTextBox or am I doing something wrong
when I add text to the box?

Thanks!
Joe

[Joe HM]

Hello -

Great ... I'll give that a try.

Thanks,
Joe

On Jan 18, 10:01 am, Michel Posseth [MCP]
<MichelPosseth. ..@discussions. microsoft.comwr ote:

I use the rich textbox control mostly for programs that have a status log
function

in these programs i use this method

Private Sub writeText(ByVal text As String, ByVal Kleur As
System.Drawing. Color)
Me.RtbxRapp.Sel ectionColor = Kleur
Me.RtbxRapp.App endText(text)
Me.RtbxRapp.Scr ollToCaret()
end sub

"Joe HM" wrote:

Hello -

I have a GUI that uses a RichTextBox to output text. The problem is
that if this box ouput text while hidden behind another window, it is
blank when I bring it to the foreground. The text is there when I
click on the scroll button on the scrollbar but it seems to be scrolled
"up" all the way.

The following code is used to add new text to that box with a certain
color:

Dim lTextLength As Integer = aRichTextBox.Te xtLength()

' The following will append aString in aColor to the Text of the
' aRichTextBox.

aRichTextBox.Se lect(lTextLengt h, 0)

aRichTextBox.Se lectionColor = aColor
aRichTextBox.Se lectedText = aString

' This will set the cursor to the end of the text so that it
' scrolls and becomes visible.

aRichTextBox.Se lect(aRichTextB ox.TextLength() , 0)

The last line of code is something I added hoping it would show the
text.

Is this a problem with the RichTextBox or am I doing something wrong
when I add text to the box?

Thanks!
Joe- Hide quoted text -- Show quoted text -