file search

hi all
how would i code a command button to search to see if a file exists and if it exist to put text1.text = "yes" and if it dont text1.text = "no" ?

thanks :D

In the Command button click event write:

Dim strFileName as String
strFileName = "C:\MyDir\Myfile.ext" 'replace with your file info
If Len(Dir(strFileName)) Then
Text1.Text = "yes"
Else
Text1.Text = "no"
End If

thank you :D