Programación General > Visual Basic para principiantes

 Como Ocultar Lo Que Escribo

(1/1)

gervb:
Hola a todos tengo hecho un programita de gestion el mismo utiliza varios usuarios ahora yo quisiera ocultar cada vez que escribo la contraseña, con asteriscos como se podria hacer.
Gracias de antemano

cpmario:
La manera más fácil es usar la propiedad PasswordChar de un TextBox.

O puedes usar un código parecido al siguiente en el evento Keypress de un TextBox


--- Código: Text ---    Dim letters As String    'Caracteres permitidos en la contraseña    letters = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzáéíóúüÁÉÍÓÚÜñÑ0123456789"    If KeyAscii = 8 Then        If Len(mvarRespuesta) > 0 Then            'Resta un caracter a la contraseña            mvarRespuesta = Left(mvarRespuesta, Len(mvarRespuesta) - 1)        End If    ElseIf InStr(letters$, Chr$(KeyAscii)) Then        'Guarda el valor de la contraseña        mvarRespuesta = mvarRespuesta + Chr$(KeyAscii)        KeyAscii = 42    Else        KeyAscii = 0    End If        'El Ucase es para no tener que evaluar mayúsculas y minúsculas    If UCase(mvarRespuesta) = UCase(gstrMainKey) Then         'Aquí va el código para evaluar la contraseña    Endif  :comp:

gervb:
Gracias cpmario me sirvio mucho el codigo que me diste.

Navegación

[0] Índice de Mensajes