Visual Basic - AYUDA CON CONTRASEÑAS

SOY UN ESTUDIANTE DEL NIVEL MEDIO SUPERIOS ESTOY EN 6 SEMESTRE TENGO PROBLEMAS PARA REALIZAR MI SISTEMA
NECESITO AYUDA PARA SABER COMO HACERLE PARA QUE AL ACCESAR A MI SISTEMA ESTE ME PIDA UNA CONTRASEÑA YO LO INTENTO HACER EN UN FRM CON UN CMB Y UNA TXT Y DOS CMD (ACEPTAR Y CANCELAR) EN EL CMB SOLO HAY DOS TIPOS DE USUARIO Y DE ACUERDO AL USUARIO ES UNA CONTRASEÑA. ADEMAS LA CONDICION ES DE QUE A LA TERCERA OPORTUNIDAD DE QUE ESCRIBES MAL LA CONTRASEÑA TE SAQUE DEL SISTEMA.

Llama a tu formulario de acceso desde el objeto inicial (sub main)

Sub main ()
FrmAcceso.show
end sub

----Formulario de Ingreso de Passw
private sub texto_lostfocus()

intentos= intentos + 1
if intentos <= 3 then
call validar_contraseña
else
msgbox "Muchos intentos"
endif

end sub

private function validar_contraseña

if la contraseña es false
msgbox "clave mala"
texto.setfocus
end if

end function

espero que te sirva

puedes guardar a los usuarios con sus respectivas contraseñas en una base de datos, cuando preguntes el usuario y contraseña puedes hacer un bucle que solo se repita 3 veces, si a la tercera se repite pues termina con END la ejecución de tu programa.

Suerte

En VB existe un form que tiene eso habilitado, en el esta todo lo que pides lo unico es que tienes que adecuarlo a tu programa. CUlaquier duda pasame un correo y te envio un ejemplo