|
|
|
![](images/pasta_topo.gif)
|
![](images/folha.gif)
|
Dicas
|
![](images/folha_fim.gif)
|
Visual Basic (Mouse/Teclado)
|
|
![](images/box01esqsup.gif) |
Título da Dica: Desabilitar o mouse (Via API)
|
![](images/box01dirsup.gif) |
|
|
Postada em 14/8/2000 por Webmaster
webmaster@vbweb.com.br
1. Declare a API que oculta/exibe o mouse (no módulo): Declare Function ShowCursor Lib "user32" Alias _ "ShowCursor" (ByVal bShow as Long) as Long
2. Chame-a no form_load: ShowCursor False 'oculta o mouse
3. No form_unload, re-exiba o mouse: ShowCursor True 4. Crie uma rotina Form_Mouse e Form_KeyDown. Se houver movimento e teclas pressionadas, finalize o programa.
Unload Me 'descarrega o form e devolve o mouse End 'garante o fechamento do programa
|
|
|
|
![](images/hosted.gif)
|