ScroolBars auto-rolar

[possamai86]

Olá amigos...

Tenho um chat simples no Excel com o Winsock, nesse chat eu tenho uma caixa de texto com scroolbar vertical "txtIn" onde recebo minhas mensagens. Porém quando minha textbox ficha cheia, eu tenho que clicar nesse Scroolbar sempre que chegam novas mensagens.

Teria um código para descer automaticamente quando eu recebo uma msg?

[srobles]

possamai86,

Experimente o que segue abaixo. Insira estas linhas ao final do código que atualiza o TextBox.

Código: Selecionar todos

  txtIn.SetFocus
  txtIn.SelText = txtIn.LineCount

Abs