Contraseña en Formulario

Hola expertos
Como puedo hacer para que al darle un click a un botón para abrir un formulario, que no se abra si no es con contraseña, osea que antes me pida el password.
Gracias

1 respuesta

1
Respuesta de
En el evento al abrir puedes poner el siguiente código
Dim MyPass As String
Dim TuPass As String
MyPass="clavesecreta" 'Clave que deseas para el formulario
TuPass=InputBox("Clave de Acceso","Introduce la clave","")
If TuPass<>MyPass Then
MsgBox "La clave de acceso al formulario no es valida"
Cancel=-1
End If
Espero te sirva
Saludos
Gracias JuanMiguel, funciona bien, pero se puede poner mascara (******) para que lo que teclees no te lo puedan ver, si no se puede me lo dices y cierro la pregunta, pues con cuidado también sirve... Gracias
Hay 2 soluciones, la primera es hacerlo por medio de un formulario con un cuadro de texto con la mascara de entrada 'Password' y la segunda muy buena (excelente diria yo) es la del maestro 'happy' que tiene infinidad de codigo muy bueno en su pagina http://www.mvp-access.com/accessvbafaq y en esta direccion en especifico http://www.mvp-access.com/accessvbafaq/item.asp?pagina=37 esta lo que tu buscas
Si tienes más dudas o deseas aprender cosas muy interesantes sobre Access te puedo recomendar el Foro del Búho que se encuentra en la siguiente dirección
http://www.mvp-access.com/foro
Seguro te va a gustar
Añade un comentario a esta respuesta
Añade tu respuesta
Haz clic para o
Escribe tu mensaje
¿No es la respuesta que estabas buscando? Puedes explorar otras preguntas del tema Microsoft Access o hacer tu propia pregunta: