Basic - validar la contraseña AYUDA URGENTE

Tengo el siguiente problema, me he pegado en el inicio de mi trabajo, he realizado todo lo demas pero no he sido capaz de validar la contraseña tres veces, he insertado ciclos for, while y nada. lo que necesito es que el programa se cierra a la tercer vez que se ingrese la contraseña o el usuario mal, este es el codigo base que tengo:

Private Sub btnaceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnaceptar.Click
'CICLO()
If (txtusuario.Text = "julian") Or (txtusuario.Text = "andres") And (txtcontraseña.Text = "123") Then
Me.Close()
frmmenu.Show()
Else
txtusuario.Clear()
txtcontraseña.Clear()
txtusuario.Focus()
End If
End
End Sub