請VB高手幫幫忙"計數器"問題(已解決)

acercer

我希望做成的程式是說
程式啟動後
我還沒點BUTTON之前 他在Label1的框框內顯示的是123
然後我點第一下123就開始閃爍
我點第2下 123就消失不見
我在點第3下 123又再出來
我在點第4下 123又開始閃爍
重複這樣的情況
這是我打的
Public Class Form1
    Dim a As Integer = 0
...

瀏覽完整內容，請先 註冊 或 登入會員

Aeroth

大致如下：

1. Public Class Form1
   
2.     Private _hits As Integer = 1
   
3.     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   
4.        Me.Timer1.Interval = 400
   
5.     End Sub
   
6. 
   
7.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
   
8.         If Me._hits > 4 Then Me._hits = 1
   
9. 
   
10.         Select Case Me._hits
    
11.             Case 1
    
12.                 Me.Timer1.Start()
    
13.             Case 2
    
14.                 Me.Timer1.Stop()
    
15.                 Me.Label1.Text = String.Empty
    
16.             Case 3
    
17.                 Me.Label1.Text = "123"
    
18.             Case 4
    
19.                 Me.Timer1.Start()
    
20.         End Select
    
21. 
    
22.         Me._hits += 1
    
23.     End Sub
    
24. 
    
25.     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    
26.           If Me.Label1.Text = "123" Then
    
27.             Me.Label1.Text = String.Empty
    
28.         Else
    
29.             Me.Label1.Text = "123"
    
30.         End If
    
31.     End Sub
    
32. End Class

複製代碼

...

瀏覽完整內容，請先 註冊 或 登入會員

acercer

感謝大大的"知識"
本人就把"它"收下了