tenho um menu que tem um 2 botoes à esq.da tela [BANCO] e [CADASTROS];
quando o usuário clica no [BANCO],aparecem mais 5 botoes referentes ao selecionado [BANCO], tipo [CADASTRA CONTA], [CADASTRA MOVIMENTO], [EXTRATO], etc.
esses ultimos botoes (sub-opcoes) foram criados com copiar/colar (index);
o index 0 é o [CADASTRA CONTA], o 1 é o [CADASTRA MOVIMENTO] e assim por diante.
O que me intriga: ao clicar o mouse, não é aceito a opcao, mas ao se digitar [ALT]+[C], é executada a rotina. PORQUE NAO FUNCIONA COM A PROPRIEDADE botao_click do MOUSE e só com o [ALT] + letra??????????????????
a bendita:
Private Sub botao_Click(index As Integer)
opcao = index + 1 ' com click do mouse nao funciona
opcao = opcao + estouno
MsgBox opcao 'só mostra se eu der ALT+Letra
Select Case opcao
Case 1 To 17
Load frmgrid
frmgrid.Show
End Select
End Sub