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
HOLA!!!
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()
DEBUG.PRINT DoesFileExist("C:\file.txt")
End Sub
P.D: Indenta el codigo plz.
GRACIAS POR LEER!!!
dim XD as boolean
XD = DoesFileExist "C:\file.txt"
debug.print XD
HOLA!!!
Cita de: Elemental Code en 15 Julio 2011, 20:03 PM
dim XD as boolean
XD = DoesFileExist "C:\file.txt"
debug.print XD
XD Eso va a dar error, necesitas ponerle parentesis si o si cuando igualas a algo o llamas el resultado.
GRACIAS POR LEER!!!
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:
debug.print funcion string
¿no se podría hacer con un simple parámetro/operador que reconozca el argumento anterior?
algo así:
debug.print %1
(Lo sé, me ha quedado muy batch :xD)
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.
HOLA!!!
Ejemm
No, no se puede, para escribir en la ventana de Inmediato tenes que hacer debug.print.
GRACIAS POR LEER!!!
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:
DEBUG.PRINT DoesFileExist("C:\file.txt")
¿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 :xD
Cita de: pitoloko en 15 Julio 2011, 20:30 PM
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 :xD
Deja de comprar batch con vb :¬¬ Acaso lo probaste en vbs?
No se puede, Debug.Print acepta cualquier variable de tipo simple (sea funcion o variable o constante u operacion)
bueno, vale vale :-\
Solo intentaba averiguar eso, además, en vbs si que se puede...
(0)
(1)
...Por eso, es muy raro que en VB no.
un saludo!
PD: Pronto os intentaré recompensar la ayuda xD
Alguien no ha seguido los consejos de leer El Guille..
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.
Cita de: $Edu$ en 15 Julio 2011, 23:03 PM
Alguien no ha seguido los consejos de leer El Guille..
Voy por este capítulo :¬¬
http://www.elguille.info/vb/cursos_vb/basico/basico05_2.htm :xD
saludos