VB.NET 2010 如何在类Class1中调用timer事件 触发 的方法

Public Class Class1
Private WithEvents MyTimer As New Timer
Private intSum As Integer

Public Sub New(ByVal intInterval As Integer)
        MyTimer.Interval = intInterval       'intInterval设置为1000 就是间隔1秒
        MyTimer.Enabled = True             '启动Timer
    End Sub

Private Sub MyTimer_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyTimer.Tick
'***********在此处加上你要操作的代码************Start
        intSum = intSum + 1      '如累加intSum的值
        '***********在此处加上你要操作的代码************End
    End Sub

 

转载于:https://www.cnblogs.com/st2012/archive/2012/04/06/2435384.html