Error Checking in Excel
Thanks Thanks:  0
Likes Likes:  0
Results 1 to 2 of 2

Thread: Some help again, on same thing

  1. #1
    New Member
    Join Date
    Mar 2002
    Posts
    26
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    Im still working on the password entry thing.Dim strPass As String
    Dim iTries As Integer
    Private Sub CommandButton1_Click()

    strPass = TextBox1.Text

    Do Until iTries = 3
    If strPass = "Password" Then
    MsgBox "Log in OK!"
    Run "signin"
    End
    End If
    MsgBox "Log in NOT OK!"
    iTries = iTries + 1
    Exit Do
    Loop

    End Sub

    Is it possible to use a number of diffrent passwords, rather than a signgle set password??? I'll work on it, untill any sugestions, thanx alot

    Craig


  2. #2
    . MrExcel's Avatar
    Join Date
    Feb 2002
    Location
    Merritt Island Florida
    Posts
    864
    Post Thanks / Like
    Mentioned
    5 Post(s)
    Tagged
    0 Thread(s)

    Default

    Instead of an If, use a Select:

    Select Case LoginID
    Case "pass1", "pass2", "pass3"
    Msgbox "Login OK"
    Case
    Msgbox "Not OK"
    End Select
    View a collection of recent Excel articles in the Excel Daily News

Some videos you may like

User Tag List

Like this thread? Share it with others

Like this thread? Share it with others

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •