Question

求大神给我编写一个vb的代码，效果是我点击按钮图标，在文本框里陆续的显示123，456，789。懂

求大神给我编写一个vb的代码，效果是我点击按钮图标，在文本框里陆续的显示123，456，789。懂 ？就是说我只按一下，文本里先显示123，然后123换成456，然后456换成789。每个1秒换一次。

Answer 1

Dim n As Integer
Private Sub Command1_Click()
   Timer1.Enabled = True
   n=1
End Sub
Private Sub Form_Load()
   Timer1.Interval = 1000
   Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
   Text1.Text = Trim(n) & Trim(n + 1) & Trim(n + 2)
    n = n + 3
   If n > 8 Then n = 1
End Sub
'所用控件，文本框text1，按钮command1，时间控件timer1

追问

谢谢你大神