button1 click
timer1.start
我想搞一个TIMER控件。让它在30秒停止，大家谁知道停止代码怎么写呢，我写的
我在timer tick中写的代码是:
dim dt as timespan
if dt.sencond=30 then
timer1.stop
怎么不对呢?到30秒它也不停啊?
  

这怎么可能呢,你一定是哪一点搞错了!!

一定要先在初始化时设Timer的Interval属性，tick事件只是到Interval规定的时段触发而已，所以你的时间间隔要在Interval里设！否则计时器就无法获知正确的触发时间而无法引发你的tick事件！记住Interval的时长是以毫秒计算的！示例可以这样： 在form_load事件中 With timer1 .Interval = 30000 .Enabled = True End With 然后在tick事件中写timer1.enabled=false即可 请你老实回答我：你没有看MSDN吧

Public a As Integer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Me.Timer1.Interval = 1000 Me.Timer1.Start() End Sub

Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick a = a + 1 If a = 30 Then Timer1.Stop() MsgBox(a) End If End Sub