簡(jiǎn)單的說(shuō)Timer是一個(gè)時(shí)間的控件, 不能說(shuō)Timer的值等於2秒時(shí),因?yàn)門(mén)imer相當(dāng)於時(shí)間,只能說(shuō)當(dāng)Timer跳動(dòng)兩秒時(shí)觸發(fā)某事件。 代碼如下: ' 首先要確定啟動(dòng)控件 Me.Timer1.Enabled = True’啟動(dòng)控件 Me.Timer1.Interval = 1000‘設(shè)定跳動(dòng)頻為1秒。
成都創(chuàng)新互聯(lián)主要為客戶提供服務(wù)項(xiàng)目涵蓋了網(wǎng)頁(yè)視覺(jué)設(shè)計(jì)、VI標(biāo)志設(shè)計(jì)、營(yíng)銷(xiāo)型網(wǎng)站建設(shè)、網(wǎng)站程序開(kāi)發(fā)、HTML5響應(yīng)式重慶網(wǎng)站建設(shè)公司、移動(dòng)網(wǎng)站建設(shè)、微商城、網(wǎng)站托管及成都網(wǎng)站維護(hù)公司、WEB系統(tǒng)開(kāi)發(fā)、域名注冊(cè)、國(guó)內(nèi)外服務(wù)器租用、視頻、平面設(shè)計(jì)、SEO優(yōu)化排名。設(shè)計(jì)、前端、后端三個(gè)建站步驟的完善服務(wù)體系。一人跟蹤測(cè)試的建站服務(wù)標(biāo)準(zhǔn)。已經(jīng)為成都陽(yáng)光房行業(yè)客戶提供了網(wǎng)站制作服務(wù)。
Dim TimerMove As System.Timers.Timer
TimerMove = New System.Timers.Timer
With TimerMove
AddHandler TimerMove.Tick, AddressOf TimerMove_Tick
TimerMove.Interval = 1000
TimerMove.Start()
End With
Private Sub TimerMove_Tick(ByVal sender As Object, ByVal e As EventArgs)
Label2.Left = Label2.Left - 20
If Label2.Left = -200 Then
Label2.Left = 1000
End If
End Sub
額 你好,
通過(guò)引發(fā) Timer 事件,Timer 控件可以有規(guī)律地隔一段時(shí)間執(zhí)行一次代碼。
msdn原文:如果應(yīng)用程序或其它應(yīng)用程序正在進(jìn)行對(duì)系統(tǒng)要求很高的操作─ 例如長(zhǎng)循環(huán)、高強(qiáng)度的計(jì)算或者正在訪問(wèn)驅(qū)動(dòng)器