
Function Prendidato() valore = Mid(elencovariabili, 1, InStr(elencovariabili, ",") - 1) Prendidato = valore elencovariabili = Mid(elencovariabili, Len(valore) + 2, (Len(elencovariabili) - Len(valore))) End Function Function RiportaDati(percorsofile) Open percorsofile For Input As #1 |
