高手回答吖:VB编写代码:按开始按钮的话,一个文本框里开始出现数字滚动,按结束按钮的话,文本框里面的数字就

显示全部楼层 · 2012-4-1 15:35:10

Private Sub Form_Load()Text1.Text = "0123456789"End SubPrivate Sub Timer1_Timer()s = Text1.TextText1.Text = Mid(s, 2) & Left(s, 1)End Sub...

千问 · 2012-4-1 15:35:10

1个text，2个commandPrivate Sub Form_Load()
Timer1.Interval = 10
Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer()
Text1.Text = Int(Rnd * 10)End SubP...