vb延时问题

来源：百度知道 编辑：UC知道 时间：2024/05/25 15:11:10
Me.Caption开始时值为5五秒后变成10在过五秒变成20就行了
麻烦代码简单点

首先添加一个Timer控件，然后将其Interval属性设置成5000，在Timer的Dick事件里写 Dim i As Integer = 0

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

i = i + 5
Me.Text = i
End Sub

当然上面的i是全局变量，要写在该事件外边，同时在窗体的Form_Load时间里写上Timer1.Start()即可