包含vb.net模块用定时器的词条

怎么利用vb.net中的定时器使转盘转起来？

你没有明白Timer控件的工作原理：

创新互联公司主要从事成都网站设计、网站制作、外贸营销网站建设、网页设计、企业做网站、公司建网站等业务。立足成都服务张湾,十多年网站建设经验,价格优惠、服务专业,欢迎来电咨询建站服务:13518219792

你可以按照下面代码，做一个实验，然后体会，关键：

Timer控件按照其Interval设置的值，每间隔一定的时间，自动触发其Tick事件。

Public Class Form1

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Label1.Text = Now

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Timer1.Interval = 1000

Timer1.Enabled = True

End Sub

End Class

控制台调用Timer和窗体是类似的。首先在项目引用里面加入System.Windows.Forms程序集，然后在代码顶部引入命名空间：

Imports System.Windows.Forms

在控制台的Module中声明一个计时器：

Private WithEvents Timer1 As New Timer()

把计时器的Tick事件静态绑定到处理函数中：

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

'一些代码

End Sub

在需要开始计时的地方，修改其Interval、Enabled属性：

Timer1.Interval = 1000

Timer1.Enabled = True

Timer1.Interval = 500

Private Sub Timer1_Timer()

Timer1.Enabled = False

Dim ss As String

ss = Format(Now, "HH:mm:ss")

If ss = "12:00:00" Then

'执行备份语句

End If

Timer1.Enabled = True

End Sub

还有一个办法就是可以用SQL自身的功能，在SQL里面可以添加任务，设置周期为每天，时间为12点，到时候执行一下备份

当前文章：包含vb.net模块用定时器的词条
文章URL：http://myzitong.com/article/hjhsce.html