189 8069 5689
你没有明白Timer控件的工作原理：
创新互联建站是一家专业提供晋宁企业网站建设,专注与成都做网站、成都网站建设、H5高端网站建设、小程序制作等业务。10年已为晋宁众多企业、政府机构等服务。创新互联专业网站制作公司优惠进行中。
你可以按照下面代码，做一个实验，然后体会，关键：
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
需要准备的工具：电脑，VB6.0程序设计软件。
1、首先打开VB6.0程序设计软件，到程序新建工程主界面，如下图：
2、然后双击新建工程里的”标准 exe“进入工程1（forml）如下图:
3、在左边工具栏窗体上先加载一个计时器控件 如图：
4、加载好计时器控件后，我们在当前计时器控件下面加载一个标签。
5、为了使加载的标签在运行时能把它看清楚，通过修改右边属性”Bordarstyle"里面的属性”0“改选为”1“使标签边框凹陷下去 ，如图：
6、接下来，我们将当前标签右边的属性名称改为”L1“如图:
7、我们开始修改计时器的属性，接下来我们把计时器控件当前的”interval“的属性设置成”1000“ 毫秒，就是1秒钟让它产生一次事件，如图 :
8、双击计时器控件，开始编写计时器程序，”L1.caption=time”如图：
9、然后返回“form"窗口，点击运行，一个简单的计时器软件就做好了。
1、开机进入桌面后，按下“Windows徽标键+I”键，选中并打开“控制面板”
2、在“控制面板”中的“系统和安全”里，选中“管理工具”里的“计划任务”，并打开“计划任务”
3、在“任务计划程序”里，打开“创建任务”
4、在“创建任务”的“常规”中，根据相应需求设置，比如“名称：定时关机”
5、在“创建任务”的“触发器”中，点“新建”，并在“新建触发器”中，根据相应需求设置后，点“确定”
6、在“创建任务”的“操作”中，点“新建”，并在“新建操作”中的“程序或脚本”里，根据下图依次输入“shutdown”和“-s”后，“点“确定”
7、在“创建任务”的“条件”中，根据相应需求设置
8、在“创建任务”的“设置”中，根据相应需求设置后，点“确定”
9、这时“定时关机”的任务已创建完成！
请参考：
Dim eTime As DateTime
Dim sTime As DateTime
sTime = DateTime.Now()
For i As Integer = 0 To 100000
Next i
eTime = DateTime.Now()
Dim Scound As Double = Math.Round(((eTime - sTime).TotalMilliseconds() / 1000), 4)
MessageBox.Show("当前循环总计用时：" + Scound.ToString() + " 秒")
也可以使用Stopwatch
Dim stopWatch As New Stopwatch()
'添加一个label标签名字label1 用来显示时间
'再添加一个timer控件 名字timer1 interval属性=1000 用来计时
'窗体添加代码
Dim t As Date '用来记录时间
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Timer1.Tick
t = t.AddSeconds(1)
Label1.Text = "登录时间:" t.TimeOfDay.ToString
End Sub
简单的说Timer是一个时间的控件， 不能说Timer的值等於2秒时，因为Timer相当於时间，只能说当Timer跳动两秒时触发某事件。 代码如下： ' 首先要确定启动控件 Me.Timer1.Enabled = True’启动控件 Me.Timer1.Interval = 1000‘设定跳动频为1秒。