随笔分类 -  类操作

摘要：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... 阅读全文