Archivi reale, L1,L2,L3,L4, precisazione

« Older Newer »

g.silent

Posted on 18/3/2018, 19:16 by: g.silent

Top Member

Group:: Member

Posts:: 768

Status:

HTML

Sub Main
'generatore archivi paralleli accostati

r = 2
For es = EstrazioneFin-10 To EstrazioneFin
Scrivi DataEstrazione(es) & "|" & StringaEstratti(es,r) & "|",0,0
Scrivi StringaEstratti(es,r,,,1) & "|",0,0
Scrivi StringaEstratti(es,r,,,2) & "|",0,0
Scrivi StringaEstratti(es,r,,,3) & "|",0,0
Scrivi StringaEstratti(es,r,,,4) & "|",0,1

Next

Scrivi Space(12)&FormatSpace("reale",15)&FormatSpace("L1",15)&FormatSpace("L2",15)_
&FormatSpace("L3",15)&FormatSpace("L4",15)

End Sub

Edited by g.silent - 19/3/2018, 12:35

9 replies since 16/9/2016, 16:54 559 views