Bom dia pessoal.

Estou precisando de uma ajuda de vc's.

quem puder ajudar leia a situação abaixo e me respondam.

Temho um programinha com um MDI, dentro do MDI tem 2 picturebox um aligntop(parte superior) e outro left(a esquerda),0 o q está com aligntop tem uns botoes como cadastro, consulta etc e o left abre os botões correspondentes ao q eu clicar no top ex:se eu clicar em cadastro do top no left abre as opções de cidade, funcionário, cliente etc, e eu cloquei um código para quando eu abrir um formulário o outro automaticamente feche, ou seja fica apenas um formulário aberto, mas qunado eu coloco o codigo "unload me" para fechar o formulario antes de abrir o outo os botõs do picturebox alignleft somem, então eu coloque o códico "call botaocadastro_click" para os botões aparecerem de novo, mas o programa ficou lento e quando clica em outro botão fica dando uns flesh's na tela e fica horrível o programa. alem de ficar muito lento.

Alguém sabe como eu faço para deixar só o ultimo formuláro aberto sem o programa ficar lento e ficar dando flesh's???

Obrigado e desculpe por contar toda historinha!!!

Tá dificil analizar assim....Mas provavelmente vc colocou o call Botaocadastro dentro do form_active... Se for o caso faça o seguinte :

Dim AtivaBotoes as Boolean

Private Sub Form_Load()
   AtivaBotoes = False

End Sub

Private Sub Form_Activate()

if AtivaBotoes = false then

   Call BotaoCadastro
   AtivaBotoes = True
End if
End Sub