用textbox接收数据时，右边的滚动条老是上下滚动？？？

Question

我自己做了个串口调试程序，但接收到数据显示时，接收框右边的滚动条老是
上下滚动，我用的是
text1.text=text1.text & "接收到的数据"
text1.selstart=len(text1.text)
text1.setfocus
我发现只要执行到第一行，滚动条就向上跑；执行第二行，滚动条就向下跑。接收数据时怎么能让滚动条一直在下面? 请指点一下！先谢了！

Answer 1

Text1.Text = Text1.Text & "接收到的数据"
Text1.SelStart = Len(Text1.Text)
Text1.SetFocus
SendKeys "^{Home}"

Answer 2

你们用过串口调试助手吗？我想做的和他的接收一样
  边接收边往下滚。下面是下载地址：
http://sq2.onlinedown.net/down/scommv22.zip

Answer 3

主要问题是：只要一执行
text1.text=text1.text & "接收到的数据"
滚动条就向上跑朋友们，帮帮忙！！

Answer 4

to Gelim(Gelim) :    赶快贴出来呀！

Answer 5

Text1.Text = Text1.Text & "接收到的数据"
Text1.SelLength = Len(Text1.Text)
Text1.SelStart = Text1.SelLength
Text1.SetFocus

Answer 6

我原来的没找到，我记得是用API的，但现在不记得了！我想想！

Answer 7

不行,你是不是说sendmessage(text1.hwnd,EM_SCROLL,SB_LINEDOWN,0)让滚动条向下滚但只要一给text1赋值，滚动条就往上跑！

Answer 8

如果仅仅用于显示，不如用ListBox控件：List1.AddItem "接收到的数据"
List1.ListIndex ＝ List1.NewIndex

Answer 9

如果不希望最后的数据反白显示，最后再加一句：
List1.ListIndex ＝-1

Answer 10

问题是:几百个字节，我还要看呢，一串二进制数用listbox不太好！

Answer 11

用以下代码试试 我试过了好使 ：）
    Text1.SelStart = Len(Text1)
    Text1.SelText = "abcdefkjaiojgk" & vbCrLf

Answer 12

声明API
Private Declare Function LockWindowUpdate Lib "user32" (ByVal hwndLock As Long) As Long然后
LockWindowUpdate Text1.hWnd
text1.text=text1.text & "接收到的数据"
text1.selstart=len(text1.text)
text1.setfocus
LockWindowUpdate 0

Answer 13

bdhh(Silent) 的效果也一般，其实关键在于text1.text=text1.text & "接收到的数据",只要用了这句就会使文本框闪烁，而楼主的要求是不闪烁。

Answer 14

存在的主要问题就是 楼上Gelim(Gelim)所指出的。大家来看一下这位朋友做的串口调试程序：他做的接收框不闪烁!http://www.gjwtech.com/index.htm而且也有源码，不过是VC，我看不懂。朋友们帮忙看一下。

Answer 15

shakewave(逐月浪子)的应该可以。

Answer 16

to  shakewave(逐月浪子),jintianatxd(tian):不行我要接收数据，必然要用到 text1.text=text1.text & "接收到的数据"但只要执行这一句，滚动条就往上滚。

Answer 17

楼主啊，我试了你所的那个vc的程序，一样的情况阿，都会闪烁。其原代码中m_strRXData+=strtemp; //加入接收编辑框对应字符串和text1.text=text1.text+strtemp一样的！

Answer 18

gelim(gelim):你试一下那个 串口调试助手2.2， 下载后解压缩，执行,不闪烁！QQ加我:24045712