Private Sub AlimentaUSciteGruppo(LvView, frz)
Dim itm As ListViewItem
For k As Integer = 0 To UBound(frz.aUscite)
itm = LvView.Items.Add(frz.aUscite(k).IdEstr)
itm.SubItems.Add(cArchivio.GetDataEstrazione(frz.aUscite(k).IdEstr))
itm.SubItems.Add(NumeriUscitiToString(frz.aUscite(k)))
itm.SubItems.Add(frz.aUscite(k).Ritardo)
itm.SubItems.Add(frz.aUscite(k).RitardoMax)
itm.SubItems.Add(frz.aUscite(k).Presenze)
itm.SubItems.Add(frz.aUscite(k).Frequenza)
itm.SubItems.Add(frz.aUscite(k).IncrRitMax)
Next
End Sub