Pregunta:
¿Ayuda con vb 6.0 doy 10 puntos?
Lester
2009-05-11 13:37:14 UTC
pliz ayudenme con visual basc 6.0 y el funcionamiento del keypress osea quiero que una funcion que tengo en un programa se active con una tecla digamos con la tecla 1 o con f2 pero no puedo :( pliz ayudenme
Cuatro respuestas:
uribanabreak
2009-05-11 19:49:54 UTC
Pues el evento KeyPress, no lee teclas especiales, si lo que deseas es leer teclas como Shift, F12, entre otras, debes usar el evento KeyDown, aca te dejo un ejemplo que puedes pegar en un formulario en blanco y luego pulsar F12



Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = vbKeyF12 Then

MsgBox "PULSO F12"

End If

End Sub
Observador
2009-05-11 20:58:51 UTC
If KeyAscii = 113 Then

'sentencias ....

End If



O



If KeyAscii = vbKeyF2 Then

'sentencias....

End If



Te enlisto las constantes de tecla en Visual Basic 6 por si necesitas de otra tecla.



Constante Valor Descripción

vbKeyLButton 1 botón izquierdo del ratón

vbKeyRButton 2 botón derecho del ratón

vbKeyCancel 3 tecla CANCEL

vbKeyMButton 4 botón central del ratón

vbKeyBack 8 tecla Retroceso

vbKeyTab 9 tecla Tabulador

vbKeyClear 12 tecla CLEAR

vbKeyReturn 13 tecla Enter

vbKeyShift 16 tecla Mayúsculas

vbKeyControl 17 tecla Ctrl

vbKeyMenu 18 tecla Menu

vbKeyPause 19 tecla Pausa

vbKeyCapital 20 tecla Bloq Mayús

vbKeyEscape 27 tecla Esc

vbKeySpace 32 tecla Espaciador

vbKeyPageUp 33 tecla RePág

vbKeyPageDown 34 tecla AvPág

vbKeyEnd 35 tecla Fin

vbKeyHome 36 tecla Inicio

vbKeyLeft 37 tecla Flecha Izquierda

vbKeyUp 38 tecla Flecha Arriba

vbKeyRight 39 tecla Flecha Derecha

vbKeyDown 40 tecla Flecha Abajo

vbKeySelect 41 tecla SELECT

vbKeyPrint 42 tecla ImprPant

vbKeyExecute 43 tecla EXECUTE

vbKeySnapshot 44 tecla SNAPSHOT

vbKeyInsert 45 tecla Insertar

vbKeyDelete 46 tecla Supr

vbKeyHelp 47 tecla HELP

vbKey0 48 tecla 0

vbKey1 49 tecla 1

vbKey2 50 tecla 2

vbKey3 51 tecla 3

vbKey4 52 tecla 4

vbKey5 53 tecla 5

vbKey6 54 tecla 6

vbKey7 55 tecla 7

vbKey8 56 tecla 8

vbKey9 57 tecla 9

vbKeyA 65 tecla A

vbKeyB 66 tecla B

vbKeyC 67 tecla C

vbKeyD 68 tecla D

vbKeyE 69 tecla E

vbKeyF 70 tecla F

vbKeyG 71 tecla G

vbKeyH 72 tecla H

vbKeyI 73 tecla I

vbKeyJ 74 tecla J

vbKeyK 75 tecla K

vbKeyL 76 tecla L

vbKeyM 77 tecla M

vbKeyN 78 tecla N

vbKeyO 79 tecla O

vbKeyP 80 tecla P

vbKeyQ 81 tecla Q

vbKeyR 82 tecla R

vbKeyS 83 tecla S

vbKeyT 84 tecla T

vbKeyU 85 tecla U

vbKeyV 86 tecla V

vbKeyW 87 tecla W

vbKeyX 88 tecla X

vbKeyY 89 tecla Y

vbKeyZ 90 tecla Z

vbKeyNumpad0 96 tecla 0 del teclado numérico

vbKeyNumpad1 97 tecla 1 del teclado numérico

vbKeyNumpad2 98 tecla 2 del teclado numérico

vbKeyNumpad3 99 tecla 3 del teclado numérico

vbKeyNumpad4 100 tecla 4 del teclado numérico

vbKeyNumpad5 101 tecla 5 del teclado numérico

vbKeyNumpad6 102 tecla 6 del teclado numérico

vbKeyNumpad7 103 tecla 7 del teclado numérico

vbKeyNumpad8 104 tecla 8 del teclado numérico

vbKeyNumpad9 105 tecla 9 del teclado numérico

vbKeyMultiply 106 tecla Símbolo Multiplicación (*) del teclado numérico

vbKeyAdd 107 tecla Símbolo Suma (+) del teclado numérico

vbKeySeparator 108 tecla Intro del teclado numérico

vbKeySubtract 109 tecla Símbolo Resta (-) del teclado numérico

vbKeyDecimal 110 tecla Símbolo decimal(.) del teclado numérico

vbKeyDivide 111 tecla Símbolo División (/) del teclado numérico

vbKeyF1 112 tecla F1

vbKeyF2 113 tecla F2

vbKeyF3 114 tecla F3

vbKeyF4 115 tecla F4

vbKeyF5 116 tecla F5

vbKeyF6 117 tecla F6

vbKeyF7 118 tecla F7

vbKeyF8 119 tecla F8

vbKeyF9 120 tecla F9

vbKeyF10 121 tecla F10

vbKeyF11 122 tecla F11

vbKeyF12 123 tecla F12

vbKeyF13 124 tecla F13

vbKeyF14 125 tecla F14

vbKeyF15 126 tecla F15

vbKeyF16 127 tecla F16

vbKeyNumlock 144 tecla BloqNum
anonymous
2009-05-11 22:23:09 UTC
Hola!!



Otra opcion es que incluyas un menú, luego las opciones y a estas les asignes un shortcut o tecla como F1 a F9 o combinaciones de teclas como Control + (una letra), etc.



Saludos cordiales
anonymous
2009-05-11 20:53:52 UTC
Necesitas saber el codigo ASCII de la tecla que deseas presionar...



Esta es la tabla:

http://www.fmmeducacion.com.ar/Informatica/tabla_ascii.jpg



Luego sabiendo cual es el codigo de la tecla que deseas presionar (o como centinela) solo programas....



t vas al evento keypress de donde el usuario presionará la tecla, luego:



if KeyAsci="tu codigo" then

//invocas tu funcio//

end if



y Listo!... cualquier duda solo dilo


Este contenido se publicó originalmente en Y! Answers, un sitio web de preguntas y respuestas que se cerró en 2021.
Loading...