vb每隔一秒在列表框中产生一个五位的随机数的怎么编写?
1个回答
推荐于2017-09-02
展开全部
Private Sub Form_Load()
Randomize
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
List1.AddItem Str(Int(Rnd * 90000 + 10000))
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询