Thế này thì Timer1 chạy đến bao giờ mới dừng lại? Đánh giá 2 sao
Tạo dòng chữ chạy trên Winform như hình mẫu:
Bước 1: tạo 1 label1. Ghi gì vào đó tùy bạn, ở đây tôi ghi là Je t'aime
Bước 2: tạo 1 timer1 và thiết lập các giá trị cho nó như sau
+ Enabled = true (cái này rất quan trọng nè)
+ cho Invertal =1000( giá trị bao nhiêu tùy bạn)
Bước 3: Click double vào timer1 và nhập vào : label1.Left += 10;
Code:private void timer1_Tick(object sender, EventArgs e) { label1.Left += 10;// Left là chạy từ bên trái. Bạn có thể thay = right }
Je Pense Donc Je suis.
Thế này thì Timer1 chạy đến bao giờ mới dừng lại? Đánh giá 2 sao
Theo Mr Kill thì làm như thế nào để dòng chữ khi chạy đến lề bên phải thì dừng. Lúc Post bài định hỏi như thế nhưng ko biết sao lại quên mất. Mình mới học .NET mong các bạn góp ý!
Thanks
Je Pense Donc Je suis.
Cũng không có gì khó khăn lắm, chẳng hạn ban đầu label1 có thuộc tính Left = 20 đi nhé, bây giờ mình muốn nó chạy đến Left = 100 là tối đa, nếu vượt qua mốc này thì không chạy nữa thì chỉ việc đơn giản chỉnh timer1.Enabled=false. Thế là xong! Cụ thể code minh họa như sau:
Code:private void timer1_Tick(object sender, EventArgs e) { label1.Left += 10; if (label1.Left >= 100) timer1.Enabled = false; }
Rất hay! còn nếu như để cho nó chạy vòng thì sao, giả dụ khi chạy đến lề bên phải thì nó chạy ngược trở lại.
Bạn giúp mình nhé!
Je Pense Donc Je suis.
Mình code tạm cho bạn xem, có gì chỉnh sửa cho phù hợp nhé:
Code:public int i = 10; private void timer1_Tick(object sender, EventArgs e) { label1.Left += i; if (label1.Left >= this.Width - label1.Width || label1.Left<=0) i=-i; }
Chà, vậy dùng cái Timer này tạo flash screen khi startup 1 program code bằng VS 2003 được rùi. VS 2005 thì support tự tạo dùm luôn, chả hiểu sao 2003 lại ko :(
Demo bằng VB chơi, giả sử Flash green là 1 Form1, Form chính là Form2. Kéo Timer wăng vô Form1, set Enable = true, Interval cho 1,2 nghìn gì tùy, sau đó:
Nhưng lưu ý khi Form2 Exit là phải Exit toàn bộ, chứ hem phải chỉ Close đâu nhaCode:Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Me.Hide() Dim frm As New Form2 frm.Show() Timer1.Enabled = False End Sub. Code cho Button Exit bên Form2
Code đơn giản minh họa thêm cho Timer , mong pà k0n đừng cườiCode:Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click Application.Exit() End Sub
Đã được chỉnh sửa lần cuối bởi trickyboy : 19-05-2007 lúc 12:25 AM.
Chào Nobi, mình thanks bạn nhiều!
Code rất hay nhưng có chỗ mình chưa hiểu, bạn có thể giải thích rõ hơn ở chỗ câu lệnh if được ko.
Chúc bạn vui vẻ!
Nobi ơi cho mình xin nick yahoo được ko?
Đã được chỉnh sửa lần cuối bởi jack : 19-05-2007 lúc 09:06 AM.
Je Pense Donc Je suis.
Bạn cứ debug từ từ thì sẽ hiểu ngay thôi. Có gì thắc mắc trên forum này, mình sẽ trả lời bạn nhé!.
Cho hỏi là label khi di chuyển nó có biết dừng khi chạm 1 label khác không?(tức vật cản trên form. Thanks