Question

vb怎么时文本框数据每100毫秒更新一次

比如文本框内的数值每毫秒+1

Answer 1

Private Sub Form_Load()
    Text1.Text = 0 '设定初始计数值
    Timer1.Interval = 100 '定时器每100mS产生一次事件
End Sub
Private Sub Timer1_Timer()
    '定时器每100mS产生一次事件,将文本框的内容+1
    Text1.Text = Val(Text1.Text) + 1
End Sub