|
|
Postada em 25/04/2006 16:29 hs
Meu programa esta no modo Me.hide e eh uma janela soh no programa....preciso fazer com que esta janela fique Me.show (quer dizer que ela aparecera) ...... Gostaria de um código tipo um Keylog que pegue as teclas do teclado por exemplo ALT+G - assim q essas teclas forem pressionadas o Form aparecesse novamente.... sera que tem como??? Qual duvida explico melhor!!!
Obs. Hotmail uso apenas para messenger!! Aprendiz e Futuro programador!!! "Todo seu conhecimento deve ser compatilhado!!!" --- ---
|
|
|
|
|
|
Cavalheiro
|
PRESIDENTE PRUDENTE
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 26/04/2006 08:47 hs
cara tente o seguinte primeiro crie uma função Public Sub Atalho(vTecla As Integer, vControle As Control)
Select Case vTecla
Case 112 'F1 'execute seu código
End Select
End Sub segue abaixo o valor das teclas de função F? 112 'F1
113 'F2
114 'F3
115 'F4
116 'F5
117 'F6
118 'F7
119 'F8
120 'F9
121 'F10
122 'F11
123 'F12
_______________________________________________ Depto de Águas e Energia Elétrica do Estado de São Paulo
Programador
Presidente Prudente-SP
http://vbprudente.blogspot.com
|
|
|
|
|
|
Postada em 26/04/2006 08:51 hs
CAvalheiro não entendi esta função....pode me explicar melhor.... 
Obs. Hotmail uso apenas para messenger!! Aprendiz e Futuro programador!!! "Todo seu conhecimento deve ser compatilhado!!!" ------
|
|
|
|
Cavalheiro
|
PRESIDENTE PRUDENTE
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 27/04/2006 09:33 hs
desculpe acho que não expliquei direito... Retificando, no seu caso acho que fica melhor assim... digite isso no evento keydown do form 'tecla f1 If KeyCode = 112 Then
MsgBox "teste" 'coloque aqui seu codigo
End If
End Sub
segue abaixo o valor das teclas de função F? 112 'F1
113 'F2
114 'F3
115 'F4
116 'F5
117 'F6
118 'F7
119 'F8
120 'F9
121 'F10
122 'F11
123 'F12 bem mais simple e funciona, hehehe flw, qualquer duvida post...
_______________________________________________ Depto de Águas e Energia Elétrica do Estado de São Paulo
Programador
Presidente Prudente-SP
http://vbprudente.blogspot.com
|
|
|
|
|
|
Postada em 28/04/2006 07:51 hs
Cavalheiro não funcionou.........sera q vc tem outro código... Ou alguém pode me ajudar??? 
Obs. Hotmail uso apenas para messenger!! Aprendiz e Futuro programador!!! "Todo seu conhecimento deve ser compatilhado!!!" ------
|
|
|
|
|
|
Postada em 28/04/2006 08:46 hs
amigo coloque esse codigo no evendo KeyDown do seu Form, Ok? If KeyCode = vbKeyF1 Then
MsgBox "Tecla F1 foi Precionada", vbInformation, "Teste"
ElseIf KeyCode = vbKeyF2 Then
'seu codigo
MsgBox "Tecla F2 foi Precionada", vbInformation, "Teste"
ElseIf KeyCode = vbKeyF3 Then
'seu codigo
MsgBox "Tecla F3 foi Precionada", vbInformation, "Teste"
ElseIf KeyCode = vbKeyF4 Then
'seu codigo
MsgBox "Tecla F4 foi Precionada", vbInformation, "Teste"
ElseIf KeyCode = vbKeyF5 Then
'seu codigo
MsgBox "Tecla F5 foi Precionada", vbInformation, "Teste"
ElseIf KeyCode = vbKeyF6 Then
'seu codigo
MsgBox "Tecla F6 foi Precionada", vbInformation, "Teste"
End If Espero ter ajudar falow um abraço... |
|
|
|
