Results 1 to 14 of 14

Thread: What's wrong with this code? [Resolved]

Threaded View

  1. Aug 14th, 2003, 02:41 PM #1
    joe_h_31028
    joe_h_31028 is offline

    Thread Starter
    Junior Member joe_h_31028's Avatar
    Join Date
    Jul 2003
    Posts
    29

    What's wrong with this code? [Resolved]

    Dim intPress As Integer, strPass As String, x As Boolean

    Private Sub Command1_Click()
    strPass = Text1.Text
    If PassCheck() = True Then
    intPress = MsgBox("Correct Password!", vbExclamation, "The result is:")
    Else
    intPress = MsgBox("Incorrect Password", vbCritical, "The result is:")
    End If
    End Sub

    Private Function PassCheck(strPass As String) As Boolean
    PassCheck = False
    If strPass = "loser" Then
    PassCheck = True
    End Function
    Last edited by joe_h_31028; Aug 14th, 2003 at 03:37 PM.
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

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

Forum Rules


Click Here to Expand Forum to Full Width