参考答案

Private Sub Timer1_Timer()
    'Form1.L1 = Timer1.Parent.L1 + 1
    L1 = L1 + 1
End Sub