WinForm中RichTextBox切换短文本后滚动条异常问题求助

当RichTextBox加载长文本并滚动到底部后，切换为短文本时，垂直滚动条会残留显示在底部，仅在选中文本时才会消失。以下是几种可行的解决方法：

方案1：临时切换滚动条属性强制重算 #

通过短暂设置滚动条为None再恢复，触发控件重新计算是否需要显示滚动条：

private void ShortTextButton_Click(object sender, EventArgs e)
{
    richTextBox.Rtf = @"{\rtf1\ansi\ansicpg1252\deff0\nouicompat\deflang3081{\fonttbl{\f0\fnil\fcharset0 Microsoft Sans Serif;}}
{\*\generator Riched20 10.0.22621}\viewkind4\uc1 
\pard\f0\fs20 Test Line21\par
\par
Test Line22\par
\par
Test Line23\par
\par
Test Line23\par
}";
    // 临时切换滚动条状态，强制控件重新评估滚动需求
    richTextBox.ScrollBars = RichTextBoxScrollBars.None;
    richTextBox.ScrollBars = RichTextBoxScrollBars.Vertical;
    // 确保滚动到文本顶部
    richTextBox.SelectionStart = 0;
    richTextBox.ScrollToCaret();
}

方案2：使用Win32消息强制刷新滚动区域 #

通过发送Windows消息控制滚动条并强制重绘，避免控件渲染异常：
首先在窗体类中添加Win32 API声明：

[DllImport("user32.dll")]
private static extern int SendMessage(IntPtr hWnd, int wMsg, IntPtr wParam, IntPtr lParam);

private const int WM_VSCROLL = 0x0115;
private const int SB_TOP = 6;
private const int WM_SETREDRAW = 0x000B;

然后修改点击事件：

private void ShortTextButton_Click(object sender, EventArgs e)
{
    // 临时关闭重绘，避免操作过程中闪烁
    SendMessage(richTextBox.Handle, WM_SETREDRAW, IntPtr.Zero, IntPtr.Zero);
    
    richTextBox.Rtf = @"{\rtf1\ansi\ansicpg1252\deff0\nouicompat\deflang3081{\fonttbl{\f0\fnil\fcharset0 Microsoft Sans Serif;}}
{\*\generator Riched20 10.0.22621}\viewkind4\uc1 
\pard\f0\fs20 Test Line21\par
\par
Test Line22\par
\par
Test Line23\par
\par
Test Line23\par
}";
    
    // 发送滚动到顶部的消息，重置滚动位置
    SendMessage(richTextBox.Handle, WM_VSCROLL, (IntPtr)SB_TOP, IntPtr.Zero);
    
    // 恢复重绘并强制控件刷新
    SendMessage(richTextBox.Handle, WM_SETREDRAW, (IntPtr)1, IntPtr.Zero);
    richTextBox.Refresh();
}

方案3：强制布局更新与重绘 #

通过触发控件的布局计算和重绘操作，修正滚动条显示状态：

private void ShortTextButton_Click(object sender, EventArgs e)
{
    richTextBox.Rtf = @"{\rtf1\ansi\ansicpg1252\deff0\nouicompat\deflang3081{\fonttbl{\f0\fnil\fcharset0 Microsoft Sans Serif;}}
{\*\generator Riched20 10.0.22621}\viewkind4\uc1 
\pard\f0\fs20 Test Line21\par
\par
Test Line22\par
\par
Test Line23\par
\par
Test Line23\par
}";
    richTextBox.SelectionStart = 0;
    richTextBox.ScrollToCaret();
    // 强制控件重新计算布局并触发重绘
    richTextBox.PerformLayout();
    richTextBox.Invalidate();
    richTextBox.Update();
}

问题根源 #

该Bug源于WinForm RichTextBox依赖的Riched20.dll控件，在滚动到底部后切换短文本时，未正确重新计算内容尺寸与客户端区域的关系，导致滚动条渲染状态残留。上述方法均通过强制控件重新评估滚动需求或触发完整重绘来修正显示异常。

内容的提问来源于stack exchange，提问作者nannongrousong