• Home
 · 
• Miscellaneous
 · 
• This is a basic password/login form

This is a basic password/login form

This is a basic password/login form

API Declarations


Dim username As String
Dim try As Integer



Rate This is a basic password/login form

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

try = try - 1
If try = 0 then
   msgbox "Sorry username and password incorrect three times please go away",vbinformation, "Bla"
   End
End If

username = {textbox name}
password = {textbox name}

If (username = {textbox name}) and (password = {textbox name}) then
    msgbox "Well done", vbinformation, "Bla"
    load {formname}
else
    msgbox "sorry", vbinformation, "Bla"
    {textbox name for username} = ""
    {textbox name for password} = ""
    {textbox name for username.SetFocus
End if 
End Sub

Form_Load()
try = 3
End Sub