return value from a fucntion

  • Thread starter Thread starter pabs
  • Start date Start date
P

pabs

I'm using the following function to verify the existance of a file

Private Function FileExists(fname) As Boolean
' Returns TRUE if the file exists
Dim x As String
x = Dir(fname)
If x <> "" Then FileExists = True _
Else FileExists = False
End Function

I call FileExists(filename) from another routine and I need to know th
result from that check.

how can I check the return from that fucntion (either false or True) ?

thanks

Pab
 
Pabs,

Something like

If FileExists("C:\myFile.xls") = TRUE Then
' do your thing
Else
' do something els
End If

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
pabs said:
I'm using the following function to verify the existance of a file

Private Function FileExists(fname) As Boolean
' Returns TRUE if the file exists
Dim x As String
x = Dir(fname)
If x <> "" Then FileExists = True _
Else FileExists = False
End Function

I call FileExists(filename) from another routine and I need to know the
result from that check.

how can I check the return from that fucntion (either false or True) ?
Click to expand...

Assign it to a variable like:

Answer = FileExists(Filename)

or use it directly:

If FileExists(Filename) Then
' Code if the file exists.
End If

Regards,
 
Back
Top