Advanced password protection

[unknown666]

Hey,

How could I make an advanced password protections like

PasswordTxt.Text.Contains("Advanced") And
PasswordTxt.Text.Contains ("Password") And
PasswordTxt.Text.Contains ("Protection") And
UsernameTxt.Text = ("unknown666") Then
       End if
End Sub

When I enter this it doesn't work, any solution?

Kind regards,

unknown666

[Atheist]

What do you mean exactly? Is this what you're after?

If PasswordTxt.Text.Contains("Advanced") AndAlso PasswordTxt.Text.Contains("Password") AndAlso PasswordTxt.Text.Contains("Protection") AndAlso UsernameTxt.Text = "unknown666" Then
    'Do something
End If

[unknown666]

Thanks alot!

Rep+