none
Ajuda com estabelecimento de atalhos em menu! RRS feed

  • Pergunta

  • Criei um código para estabelecer atalhos para cada botão do meu menu, mas não funciona. Não dá erro, mas também não funciona. Deem uma olhada:

    Private Sub Atalhos(ByVal KeyCode As Shortcut)
            Select Case KeyCode
                Case KeyCode = 112 'F1
                    btnCaixa.PerformClick()
                Case KeyCode = 113 'F2
                    btnPedido.PerformClick()
                Case KeyCode = 114 'F3
                    btnNovoPagamento.PerformClick()
                Case KeyCode = 115 'F4
                    btnAdcRemProd.PerformClick()
                Case KeyCode = 116 'F5
                    btnNovaConta.PerformClick()
                Case KeyCode = 117 'F6
                    btnUsuario.PerformClick()
                Case KeyCode = 118 'F7
                    btnPagamentos.PerformClick()
                Case KeyCode = 119 'F8
                    btnProdCadRem.PerformClick()
                Case KeyCode = 120 'F9
                    btnConsulta.PerformClick()
                Case KeyCode = 27 'ESC
                    btnSair.PerformClick()
            End Select
        End Sub

    Eu tinha declarado a variável do método como String, mas deu erro dizendo que não podia se convertido para Double...

    quinta-feira, 7 de novembro de 2013 18:58

Respostas

  • Coloca a linha de código que chama esse método ai para analisarmos, pq ele não se AUTO EXECUTA

    Leonardo Lourenço Silva


    • Marcado como Resposta Giovani Cr terça-feira, 19 de novembro de 2013 11:52
    quinta-feira, 7 de novembro de 2013 19:34

Todas as Respostas