Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Sub LongPrint(sMessage as String) Dim nFile as Inteer nFile=FreeFile Open App.Path & "Log.txt" for Append Shared as #nFile Print #nFile, format *********************** Slds