Funcion "Solo Numeros En Textbox" (Gambas)

1 mensaje

por Kodeinfect Se conecta desde un manicomio

Simple función pero muy útil para dejar que solo se introduzcan números dentro de un textbox o lo puedes aplicar a otro control.

PRIVATE FUNCTION Solo_Numeros(KeyTecla AS Integer)
  
  IF KeyTecla >= 48 AND KeyTecla <= 57 THEN
  ELSE
  STOP EVENT
  END IF
  
END

Se Llama La Función De La Siguiente Forma:

PUBLIC SUB TextBox1_KeyPress()
  Solo_Numeros(Key.Code)
END

Para saber el Key de una tecla especifica lo puedes hacer de la siguiente forma:

PUBLIC SUB TextBox1_KeyPress()
Message.Info(Key.Code)
END

Para que cada vez que presiones una tecla dentro del textbox aparezca un Mensaje con el numero Key (Key.Code)

Welcome to your nightmare, bitch.

1 mensaje