在一个RichEditBox接到一个字符串后能自动把滚动条移到下面,可我下面的代码却不能使滚动

文字聊天程序中,在一个RichEditBox接到一个字符串后能自动把滚动条移到下面,可我下面的代码却不能使滚动条移到下面.为什么呢?望高手指教.
void CVideoNetDlg::Message(LPCTSTR lpszMessage, COLORREF clr)
{
CHARFORMAT cfm;
cfm.cbSize=sizeof(cfm);
cfm.crTextColor=clr;
cfm.dwMask=CFM_COLOR;
CString strTemp1 = lpszMessage; int len = m_richbox.GetTextLength();
if(len >15000)
{
m_richbox.SetSel(0,10000);
m_richbox.ReplaceSel(_T(""));  
}
len = m_richbox.GetTextLength();
m_richbox.SetSel(len,len);
 
m_richbox.SetSelectionCharFormat(cfm);
m_richbox.ReplaceSel(strTemp1);
int  iEndPos  =  GetWindowTextLength(); 
m_richbox.HideSelection(TRUE,  FALSE);  
m_richbox.SetSel(iEndPos,iEndPos);
SendMessage(EM_SCROLLCARET);}