Microsoft KB Archive/171480

= FIX: Setting SelAlignment Property Does Not Affect RichTextBox =

Article ID: 171480

Article Last Modified on 11/5/2003

-

APPLIES TO


 * Microsoft Visual Basic 5.0 Professional Edition
 * Microsoft Visual Basic 5.0 Enterprise Edition

-



This article was previously published under Q171480



SYMPTOMS
In Microsoft Visual Basic version 5.0, setting the SelAlignment property for a RichTextBox control may appear to have no effect. When you set the SelAlignment property, the RichTextBox control is not affected unless its RightMargin property is set to a non-zero value.



STATUS
Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. This bug has been fixed in Visual Studio 97 Service Pack 2.

For more information on the Visual Studio 97 Service Pack 2, please see the following article in the Microsoft Knowledge Base:

170365 : INFO: Visual Studio 97 Service Packs - What, Where, and Why

For a list of the Visual Basic 5.0 bugs that were fixed in the Visual Studio 97 Service Pack 2, please see the following article in the Microsoft Knowledge Base:

171554 : INFO: Visual Basic 5.0 Fixes in Visual Studio 97 Service Pack 2



Steps to Reproduce Behavior
 Start a new "Standard EXE" project in Visual Basic. Click Components on the Project menu. Check "Microsoft Rich TextBox Control 5.0" and click OK. Add a RichTextBox control and a CommandButton to Form1.  Add the following code to Form1. Private Sub Form_Click RichTextBox1.SelAlignment = rtfCenter End Sub

Private Sub Command1_click RichTextBox1.RightMargin = RichTextBox1.Width * 0.9 End Sub

 Press the F5 key to run the application. Click the Form. Note that the alignment of RichTextBox1 does not change to Center as expected.</li> Click Command1 to set the RightMargin of RichTextBox1. Notice that the alignment of RichTextBox1 is properly set to Center.</li></ol>

Additional query words: rtf rich text box textbox left right align

Keywords: kbbug kbfix kbvbp500sp2fix kbvs97sp2fix KB171480

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.