Desplegar asteriscos en un inputbox
Leo me gustaría mucho que me pudieses ayudar con esto:
Necesito hacer que el texto que se introduce en un InputBox me aparezca en forma de asteriscos "******", ya que lo necesito para manejar contraseñas.
Necesito hacer que el texto que se introduce en un InputBox me aparezca en forma de asteriscos "******", ya que lo necesito para manejar contraseñas.
Respuesta de leosoft
1
Para eso tienes que hacer vos tu propio cuadro de ingreso de clave, tienes que agregar un formulario nuevo, ese lo pones de un tamaño chico y le agregas directamente un textbox, al textbox le pones la propiedad PassWordChar = "*"
De esta manera el texto que ingreses en el textbox te lo va a enmascarar con los asteriscos "*".
Así en vez de llamar al Inputbox, llamaría al formulario
Formclave.Show 1
agrega un modulo donde definis la variable ClaveIngreso
Global ClaveIngreso as String
De esa manera colocarías un botón (el de Aceptar ) en el formulario formclave donde solo pondrías
ClaveIngreso = Text.Text
Unload Me
Así luego de la llamada al formulario formclave, solo leerías la variable ClaveIngreso y arias la comparación.
Cualquier duda estoy a tu disposición.
De esta manera el texto que ingreses en el textbox te lo va a enmascarar con los asteriscos "*".
Así en vez de llamar al Inputbox, llamaría al formulario
Formclave.Show 1
agrega un modulo donde definis la variable ClaveIngreso
Global ClaveIngreso as String
De esa manera colocarías un botón (el de Aceptar ) en el formulario formclave donde solo pondrías
ClaveIngreso = Text.Text
Unload Me
Así luego de la llamada al formulario formclave, solo leerías la variable ClaveIngreso y arias la comparación.
Cualquier duda estoy a tu disposición.
