Pero me explicas el código que si no no aprendo nada ?

Aparte me sigue dando error :S Al escribir en el textbox y presionar el botón sale el mensaje de error y puedo ver como se le añaden + carácteres a lo escrito [ÿþgg] :S

Aunque si quito el + temp , porque no se de que sirve , me funciona pero entonces veo lo de   If Pass = "x" Then , de que me sirve abrir el archivo si aquí pongo eso? :S aquí no tendría que poner la url del archivo y que lo lea?

Private Sub Command1_Click()
Dim Pass As String
Dim Temp As String
    nFic = FreeFile
    Open "C:\a.txt" For Input As nFic
    Do Until EOF(nFic)
    Input #nFic, Temp
    Text1.Text = Text1.Text + Temp
    Pass = Text1.Text
  Loop
     Close nFic
 
    If Pass = "x" Then
        Form2.Show
    Else
        MsgBox "Error, vuelva a intentarlo", vbCritical
        End
    End If
End Sub

Hola, estoy intentando hacer que si en un archivo pone x y un usuario escribe x se abrá un form y que de lo contrario salga una pantallita diciendo error.


Que hago mal?