Lập trình C# | Tạo chữ chạy trên winform trong lập trình C#

[jack]

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;

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
        }

[Mr Kill]

Thế này thì Timer1 chạy đến bao giờ mới dừng lại? Đánh giá 2 sao

[jack]

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

[neverland87]

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:

private void timer1_Tick(object sender, EventArgs e)
        {
            label1.Left += 10;
            if (label1.Left >= 100)
                timer1.Enabled = false;
        }

[jack]

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é!

[NoBi]

Mình code tạm cho bạn xem, có gì chỉnh sửa cho phù hợp nhé:

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;
        }

[trickyboy]

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 đó:

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

Nhưng lưu ý khi Form2 Exit là phải Exit toàn bộ, chứ hem phải chỉ Close đâu nha . Code cho Button Exit bên Form2

Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
        Application.Exit()
    End Sub

Code đơn giản minh họa thêm cho Timer , mong pà k0n đừng cười

[jack]

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?

[NoBi]

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é!.

[BuithiHa]

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