作业帮 > 综合 > 作业

VB里面怎样使text产生随机数,用两个command 控制开始和停止

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/22 10:21:39
VB里面怎样使text产生随机数,用两个command 控制开始和停止
按command1,text 开始不断产生随机数,按command2,text 停止产生随机数并且text 里保留最后一个数.
麻烦哪位写一下完整的代码,
Private Sub Command1_Click()   Timer1.Enabled = TrueEnd SubPrivate Sub Command2_Click()   Timer1.Enabled = FalseEnd SubPrivate Sub Form_Load()   Timer1.Interval = 300   Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer()   Randomize   Text1 = ""   Text1 = Int(Rnd * 90 + 10)End Sub