Jobs
Author: Peter Kelly Date Submitted: 10/21/2005 Category: Security Code and Programs Compatibility: VB 6 This code has been accessed 8953 times.
Email Yourself this snippet:
No declarations
Code
'Must have 2 forms' 'Create 2 text boxes named Text1 for username Text2 For password' 'Create a Command Button' Private Sub Command1_Click() If Text1.Text = "username" And Text2.Text = "password" Then MsgBox "access granted" Form2.Show Form1.Hide Else MsgBox "access denied" End If End Sub