Para que sirve el comando KeyAscii

[wilberjulio]

Hola a todos estoy aprendiendo Visual Basic y hay un comando KeyAscii peor no se para que sirve, vi una parte de un programa alguien podria explicarme que dice:


Public Function ValidaNumeroE(KeyAscii As Integer)
  If KeyAscii < 48 Or KeyAscii > 57 Then
      KeyAscii = 0 : Beep
  End If
End Function

[Mace Windu]

KeyAscii no es un comando si no una variable (fíjate en Keyascii As Integer). En la función que has publicado recoge un número (Integer), pero este número corresponde a un símbolo Ascii. Los números en Ascii van del 48 (el 0) al 57 (el 9) por lo que, según esto, si la variable KeyAscii no es un número, vale 0 (es decir, nada) y además suena un Beep.

Normalmente el el evento KeyPress (de un TextBox, por ejemplo):

Código:

Private Sub Text1_KeyPress(KeyAscii As Integer)

End Sub

Aquí, la variable KeyAscii recoge la tecla pulsada con un valor Ascii. Entonces pasándole esta variable a tu función, si fuera un número, este se escribiría en dicho TextBox o sonaría un Beep y no se escribiría nada, si no lo fuera.

He intentado explicártelo lo mejor posible. Si te surge alguna respecto a esto no dudes en publicarla .

Salu2

[wilberjulio]

Ok. Gracias Mace todo estuvo claro. Saludos

[Mace Windu]

De nada, para eso estamos .

Salu2

PD: Supongo que ya pueden cerrar el tema.