[Resolvido]Expandir e retrair list box

Bom Dia gente ..

Preciso de uma ajudinha dos mestres rs

tenho uma listbox que ao clicar em um botao preciso expandi-la na tela e clicando novamente no mesmo botao , retrai-la ..

o que acontece é que estou usando no evento ao clicar do botao o seguinte codigo :

Me!Lista2.Height = 1440    ' 1440 twips = 1 inch.

o que esta acontecendo é que ele expandi a lista para baixo e gostaria de expandi-la para cima 

Alguem pode me ajudar?


Agradeço o retorno e desde ja bom trabalho a todos ..

Fiz um form teste veja se funfa.
Usei 2 linhas em cada botão:
Uma que aumenta o tamanho e uma que ajusta o topo da caixa de acordo com o tamanho aumentado.

Veja se é isso.

Não sei outro jeito de fazer o que quer, por isso, improvisei.

Aguardo retorno.

Como eu calculo estes valores , para colocar na posicao exata que eu pretendo?

mas uma vez obrigada pela ajuda

Cada inch = 1440 twips (que é a medida no access) = 2,54 cm

Tem que fazer o cálculo.

Em quantos twips for aumentada a caixa, vc diminui no evento Top do botão que aumenta.

O que diminui, vc coloca no Top a posição inicial.

Meio complicado, mas deu pra entender?

Bjos.

A posicao inicial de baixo pra cima ou de cima pra baixo?

É a distância do topo do form ao topo da lista.

ah saquei , obrigada pela ajuda amigão funcionou

Fico feliz por ter ajudado.

Sempre a disposição.

Bjos.