Click here to Skip to main content
15,867,771 members
Articles / Programming Languages / Visual Basic
Article

Show All TextBox Text After Resize

Rate me:
Please Sign up or sign in to vote.
4.91/5 (22 votes)
16 Sep 2008CPOL2 min read 60.2K   1K   31   13
If a TextBox is wide enough to show all text, this method ensures it is visible after a resize.

Introduction

If you have a TextBox that is too narrow to display all its text, it will show the end of the text on startup:

BeforeResize.jpg

If you resize it to a width that could display the whole string, the TextBox will not reposition the text to show all text:

UnmodifiedResize.JPG

This code will reset the text position to show all text, while maintaining any text selection and carat position.

ModifiedResize.JPG

Background

The .NET TextBox control is merely a wrapper for the old Win32 edit box control. This limits its functionality, and makes it difficult to customize. Even simple tasks like resizing the height of the TextBox require you to use complex workarounds to accomplish.

When you resize a TextBox where some of the text is off the left edge of the control, it never repositions the text to show as much as the control will handle. To overcome this limitation, we need to modify the TextBox text selection.

Using the code

To reset the visible text in the TextBox, we need to change the carat (cursor) position to the beginning of the string, then back to the end. However, doing this will lose any selection that the user might have made prior to the resize. This routine will determine what is selected in the control, reset the carat location, then restore the user's selection.

Visual Basic:

VB
Private Sub SetAllTextVisible(ByRef tbTextBox As TextBox)
    Dim iSelectStart As Integer
    Dim iSelectLength As Integer

    ' Get the current selection so we can re-select it.
    iSelectStart = tbTextBox.SelectionStart
    iSelectLength = tbTextBox.SelectionLength

    ' De-select everything and set the cursor to
    ' the start of the line
    tbTextBox.Select(0, 0)
    tbTextBox.SelectionStart = 0

    ' Restore the user's original selection
    tbTextBox.Select(iSelectStart, iSelectLength)
End Sub

C#:

C#
public void SetAllTextVisible(TextBox tbTextBox)
{
    int startselect;
    int selectlength;

    // Get the current selection so we can re-select it
    startselect = tbTextBox.SelectionStart;
    selectlength = tbTextBox.SelectionLength;
    // De-select everything and set the cursor to the
    // start of the line.
    tbTextBox.Select(0, 0);
    tbTextBox.SelectionStart = 0;

    // Restore the user's original selection
    tbTextBox.Select(startselect, selectlength);
}

User Control

Alternatively, you could create a new UserControl class and change the inheritance on the class declaration from UserControl to TextBox. Override the OnSizeChanged event to call the SetAllTextVisible routine.

Important: If you change a class inheritence from UserControl to TextBox, you will need to open the UserControll.Designer code and remove the Autoscale property:

C#
private void InitializeComponent()
{
    components = new System.ComponentModel.Container();
    //Comment the line below when changing inheritence from UserControl
    //to Textbox.
    //this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;
}

public partial class ShowAllTextBox : TextBox
{
    public ShowAllTextBox()
    {
        InitializeComponent();
    }

    protected override void OnSizeChanged(EventArgs e)
    {
        SetAllTextVisible();
        base.OnSizeChanged(e);
    }

    public void SetAllTextVisible()
    {
        int startselect;
        int selectlength;

        // Get the current selection so we can re-select it
        startselect = this.SelectionStart;
        selectlength = this.SelectionLength;
        // De-select everything and set the cursor to the
        // start of the line.
        this.Select(0, 0);
        this.SelectionStart = 0;

        // Restore the user's original selection
        this.Select(startselect, selectlength);
    }
}

Enjoy!

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)


Written By
Systems Engineer ThomsonReuters Tax & Accounting
United States United States
I am a Senior System Administrator for a 400+ server ASP farm. With such a large farm and limited staff, our goal is to add as much automation as possible to the system. Most of my programming consists of intelligent slack: spending 2 hours to write a program that handles a reoccurring 10 minute manual job.

Comments and Discussions

 
GeneralMy vote of 5 Pin
TweakBird8-Nov-10 0:33
TweakBird8-Nov-10 0:33 
GeneralPerfect. Thanks. Pin
mldisibio30-Sep-08 8:54
mldisibio30-Sep-08 8:54 
GeneralExcellent and elegantly simple solution Pin
dgroves22-Sep-08 13:02
dgroves22-Sep-08 13:02 
GeneralYour Profile is interesting Pin
Dileep.M16-Sep-08 21:21
Dileep.M16-Sep-08 21:21 
RantRe: Your Profile is interesting Pin
Emil - Gabriel17-Sep-08 21:42
Emil - Gabriel17-Sep-08 21:42 
GeneralAnother way... Pin
Emil - Gabriel16-Sep-08 20:14
Emil - Gabriel16-Sep-08 20:14 
GeneralRe: Another way... Pin
Pete Souza IV17-Sep-08 3:35
professionalPete Souza IV17-Sep-08 3:35 
RantRe: Another way... [modified] Pin
Emil - Gabriel17-Sep-08 21:38
Emil - Gabriel17-Sep-08 21:38 
GeneralWhy I voted "5" Pin
Humble Programmer16-Sep-08 11:59
Humble Programmer16-Sep-08 11:59 
GeneralRe: Why I voted "5" Pin
Ilíon16-Sep-08 15:23
Ilíon16-Sep-08 15:23 
Joke[Message Deleted] Pin
Emil - Gabriel16-Sep-08 20:09
Emil - Gabriel16-Sep-08 20:09 
GeneralRe: Why I voted "5" Pin
Johnny J.16-Sep-08 22:12
professionalJohnny J.16-Sep-08 22:12 
GeneralRe: Why I voted "5" Pin
Ilíon17-Sep-08 5:50
Ilíon17-Sep-08 5:50 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.