Simple verify system in vb2008

[monkey32]

Hello this is a tut for beginners in vb, I'm gonna teach you how to make a simple verify system in vb 2008. You can bind this with different items to make you put in a password before the program opens. So heres the code for Button1:

If TextBox1.Text = "mpgh.net" Then
            MsgBox("Correct Password", MsgBoxStyle.OkCancel, "Correct")
            Me.Close()
        Else
            MsgBox("Fail Guess Again", MsgBoxStyle.RetryCancel, "Wrong Password")
        End If

        If TextBox1.Text = "" Then
            MsgBox("You didn't enter anything!", 64, "Invalid")
        End If

The msgbox styles can vary, thats just what i chose. The words in quotations after the message box styles are what the title of the msgbox is. PM me if you need any help with vb! Thank me if I helped!

[Iamazn]

Better Code

 If TextBox1.Text.Length = 0 Then

        ElseIf TextBox1.Text = "mpgh.net" Then
            MsgBox("Correct Password!", vbOKCancel, "Close?")
            If vbOKCancel Then
                Me.Close()
            End If
        Else
            MsgBox("Wrong Pass!", vbRetryCancel, )
            If vbCancel Then
                Me.Close()
            End If
        End If

[mariofan901]

Leacher much. This is off Google.com

[monkey32]

Better Code

 If TextBox1.Text.Length = 0 Then

        ElseIf TextBox1.Text = "mpgh.net" Then
            MsgBox("Correct Password!", vbOKCancel, "Close?")
            If vbOKCancel Then
                Me.Close()
            End If
        Else
            MsgBox("Wrong Pass!", vbRetryCancel, )
            If vbCancel Then
                Me.Close()
            End If
        End If

Like I said, It's for beginners. Lol. Beginners wouldn't know that.

[Iamazn]

Leacher much. This is off Google.com

Who? Me or Monkey32?

[monkey32]

Lol Iamazn, He was just kidding.