为什么RichTextBox中文字过多时不能全选

Question

用直接设置SelLength的办法倒是行，但是，当文字非常多时，这会变得无比的慢，有时候甚至会卡死所以只好用SendMessage来发送EM_SETSEL消息进行全选SendMessage RichTextBox1.Hwnd,EM_SETSEL,0,-1效果非常理想，全选操作绝对是秒杀，但当文字多的时候，此操作只能选中前面一部分文字，后面很多都不能选中？试过Windows的记事本，全选也是秒杀，可以估计也是通过SendMessage来完成的，但为什么它全选能成功？

Answer 1

dim cp as CHARRANGE
cp.cpMin = 0
cp.cpMax = -1
sendmessage RichTextBox1.Hwnd, em_exsetsel,byval 0&, cp有关常数，变量，自己找下