Vb oggetto Timer

[vonkranz]

Private Sub Timer1_Timer()
   static MinPassati 
   MinPassati=MinPassati+1
   if MinPassat>=120 then
      'copia db...
       MinPassati=0 
   end if
exit Sub

...mi sono permesso un piccola correzione...