Function DoesFileExist(FilePath As String, Optional FileAttr As VbFileAttribute) As Boolean
If Len(Dir$(FilePath, FileAttr)) > 0 Then DoesFileExist = True Else DoesFileExist = False
End Function
 
 
Private Sub Form_Load()
DoesFileExist "C:\file.txt"
End Sub

¿Como puedo saber si me devuelve TRUE o FALSE, y de paso hacer un debug.print?

gracias

dim XD as boolean
XD = DoesFileExist "C:\file.txt"
debug.print XD

gracias a los 2

¿Es necesario volver a escribir la funcion y el string en el debug?

el ejemplo que me habeis dado hace esto:


¿no se podría hacer con un simple parámetro/operador que reconozca el argumento anterior?

algo así:

(Lo sé, me ha quedado muy batch  )

EDITO: si, tengo que acostumbrarme a indentar, pero solo stoy practicando funciones XD

EDITO2: por más que me he leido esto:

http://wiki.gambas-es.org/index.php?title=Tabla_de_Traducci%C3%B3n_de_ordenes_de_VB6_a_Gambas

No encuentro ningún tipo de parámetro para hacer lo que he dicho, pero si batch si que lo puede hacer, digo yo que vb también :S.

si, a lo que me refiero es que debe existir algun parámetro en vb para reconocer el último argumento que ha pasado por el procedimiento... ¿¿¿¿NO???

por ejemplo:

Private Sub Form_Load()
    DoesFileExist("C:\file.txt")
    DEBUG.PRINT %1
End Sub

DoesFileExist("C:\file.txt")  sería el argumento 1

Y El propósito de %1 (Pongo %1 porque no conozco dicho parámetro en vb) sería que hiciera esto:



¿Me entiendes?  

Lo mismo, pero sin escribir tanto code, si en batch se puede, en vb como no se va a poder? espero que si, porque eso ahorraría muchas líneas de código  

bueno, vale vale

Solo intentaba averiguar eso, además, en vbs si que se puede...


...Por eso, es muy raro que en VB no.

un saludo!

PD: Pronto os intentaré recompensar la ayuda xD

me equivoque pero guardalo en una variable y vas a tener el valor guardado.
Si queres que chequee muuuuuuuchas veces si esta el archivo (Encuentro esto estupido) hace asi o agrega el debug.print en la funcion misma y listo.