Validar una String en Vb6

[rafuru]

Tengo algo parecido a esto:

Código:

'Si es valida la info, entrar
        usr = "usuario"
        pass = "pass"
        If txtUsr.Text = usr & txtPass.Text = pass Then
            MsgBox "Bienvenid@ " & usr, vbInformation, "Bienvenid@!"
            frmMenu.Show
            frmMain.Hide
             End If

Pero me aparece el error que ya les platicaba con el tipo de dato