Visual Basic - Botones de la toolbar

Life is soft - evento anual de software empresarial
 
Vista:

Botones de la toolbar

Publicado por leo (10 intervenciones) el 03/09/2004 15:20:41
saludos
alguien me puede decir como puedo activar un botón de una toolbar con cualquier tecla???...Si tienen algun código me ayudaría mucho.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Botones de la toolbar

Publicado por ruri (583 intervenciones) el 03/09/2004 15:43:55
Utilizá el evento MouseDown. Si hiciste KeyPreview=true en el form, éste atrapa los teclazos (OBJETO=FORM), sino utilizá el objeto que coresponda (OBJETO=Lo que sea)

Private sub OBJETO_MouseDown(KeyCode as Integer,Button as integer, Shift as Integer, X as Single, Y as Single)
Dim Key as String
select case KeyCode
Case vbKeyA
Key="Archivo"
Case vbKeyB
Key="Buscar"
Case vbKeyC
Key="Carpeta"
Case vbKeyReturn
Key="Aplicar"
Case vbKeyF1
Key="Ayuda"
End Select
Toolbar.Buttons(Key).Enabled= not Toolbar.Buttons(Key).Enabled
End Sub
Nota: en la sintaxis del evento puede haberseme patinado algo lo estoy haciendo de memoria.

Saludos Ruri
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar