E se volessi confrontare il contenuto presente all'interno del "file.txt" con quello inserito nella Text1.Text?

Ecco il codice:

Private Sub Command1_Click()

Open "c:\file.txt" For Input As #1

If Text1.Text = "file.txt" Then
MsgBox "Testo uguale"
Else
MsgBox "Testo diverso"
End If

Close #1

End Sub

Faccio qualche errore nella condizione evidenziata.