????vb 控制台 定时器

    Sub Main()
        'vb 控制台 定时器
        Dim 定时器 As System.Timers.Timer
        定时器 = New System.Timers.Timer
        AddHandler 定时器.Elapsed,AddressOf 定时器事件
        定时器.Interval = 1000

        定时器.Start()

        Console.ReadKey()
    End Sub

    Private Sub 定时器事件(ByVal sender As Object,ByVal e As EventArgs)
        Console.WriteLine(Timer)
    End Sub

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!