Private Function testing() As Boolean taille2 = SizeOfFile("C:\\Users\\bilel\\Desktop\\stage\\trsbonne_essai.txt") taille4 = SizeOfFile("C:\\Users\\bilel\\Desktop\\stage\\trsdefaut_essai.txt") If taille2 > taille1 Then test = True taille1 = taille2 Else If taille3 > taille4 Then test = True taille3 = taille4 End If End If testing = test End Function
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question