Tạo một Timer
Thời gian này tôi muốn hiển thị như thế nào để tạo ra một bộ đếm thời gian trong hình ảnh cơ bản. Net bằng cách sử dụng các thành phần bộ đếm thời gian.
Vâng, không giả vờ rằng đây là một bước ví dụ bước hiển thị mỗi tài sản sửa đổi của mỗi kiểm soát, trái lại, tôi muốn tập trung vào các chức năng của bộ đếm thời gian và tôi sẽ cho bạn thiết kế. Chỉ cần cho họ thấy rằng tôi đã làm.
Các điều khiển được sử dụng là: một hình thức, ba nút và hai nhãn. Chúng tôi cũng cần phải thêm một Timer để tạo thành. Nó sẽ nhiều hơn hoặc tháng như sau: 
Nhưng điều đầu tiên chúng tôi sẽ xác định các biến tư nhân ở cấp độ của hình thức.
Tin giờ As Integer = 0 Riêng phút As Integer = 0 Tư nhân thứ As Integer = 0 Riêng phần nghìn giây As Integer = 0
Các thành phần Timer phải có tài sản khoảng thời gian của nó đến 100.
Chúng tôi sẽ tạo ra một chức năng để hiển thị trong label1 theo thời gian:
Sub printTime ()
Label1.Text = hora.ToString.PadLeft (2, "0") & ":"
Minuto.ToString.PadLeft Label1.Text & = (2, "0") & ":"
Segundo.ToString.PadLeft Label1.Text & = (2, "0") & ":"
Milisegundo.ToString.PadLeft Label1.Text & = (1, "0")
Label1.Refresh ()
End Sub
Trong sự kiện đánh dấu thành phần Timer là nơi bạn đặt tất cả các logic của đồng hồ bấm giờ. Sao chép mã sau đây:
+ = 1 mili giây Sau đó, nếu phần nghìn giây = 9 phần nghìn giây = 0 2 + = 1 Nếu giây = 59 Sau đó, 2 = 0 + = 1 phút Sau đó, nếu = 59 phút phút = 0 giờ + = 1 Cuối Nếu Cuối Nếu Cuối Nếu printTime ()
Vâng, những gì còn lại là các mã của ba nút. Các nút bắt đầu kích hoạt các bộ đếm thời gian:
Timer1.Enabled = True
Các nút Pause dừng bộ đếm thời gian:
Timer1.Enabled = False
Và các nút reset để thiết lập lại các giá trị của các biến:
thời gian = 0 phút = 0 2 = 0 phần nghìn giây = 0 printTime ()
Tôi hy vọng rằng ví dụ này không chứng minh phức tạp và trên hết đó sẽ là hữu ích. Cuối cùng, tôi để lại cho bạn một bản chụp của đồng hồ bấm giờ được chạy: 
32 Responses to "Làm thế nào để tạo 1 Đồng hồ bấm giờ"
Bình luận
Thông tin Bitacoras.com ...
Tỷ giá trong Bitacoras.com: Thời gian này tôi muốn hiển thị như thế nào để tạo ra một bộ đếm thời gian trong hình ảnh cơ bản Net bằng cách sử dụng các thành phần hẹn giờ. Vâng, tôi không giả vờ rằng đây là một bước theo bước ví dụ hiển thị mỗi tài sản được sửa đổi của ...
Cảm ơn bạn rất nhiều, tôi chỉ mới bắt đầu với rất hữu ích. Net và cũng mô tả.
Tạm biệt.
Ví dụ rất tốt ... và cảm ơn đóng góp kiến thức cho Tiens q và q gần đây đã bắt đầu ...
Hello!
px cảm ơn bạn rất nhiều là một sự trợ giúp to lớn mã của bạn được phục vụ tôi tiết kiệm cuộc sống của tôi lol ...
không khá làm việc nhờ ...
bye bye kuidate ...
Cảm ơn bạn người đàn ông rất nhiều ... mà không có biến chứng ví dụ này, rất rất tốt, rằng Thiên Chúa sẽ giúp bạn ...
Đóng góp là rất tốt vì vậy tôi xin chúc mừng bạn!
cảm ơn bạn rất nhiều đã giúp tôi rất nhiều
Bộ đếm thời gian là tốt không để thời gian sau khi 59 giây 00:01:59:0 không nhớ nhảy từ 58 đến 00 và 59 không tồn tại, hãy kiểm tra mã của riêng bạn
Các giải pháp sẽ được như vậy
+ = 1 mili giây
Nếu phần nghìn giây = 10 Sau đó,
Phần nghìn giây = 0
Thứ hai + = 1
Nếu 2 = 60 Sau đó
Thứ hai = 0
Phút + = 1
Nếu phút = 60 Sau đó,
Min = 0
Thời gian + = 1
Cuối Nếu
Cuối Nếu
Cuối Nếu
PrintTime ()
Do đó, thứ hai hoặc phút 59 sẽ không tồn tại, nhưng rất biết ơn cho những đóng góp.
Rất tốt, cảm ơn bạn rất nhiều! Tôi có tôi của tôi là duranga
THANKS! Tôi tỉnh dậy logic ví dụ XQ thực hiện một dự án lớn, tôi hy vọng sẽ tiếp tục đánh giá này thể hiện ví dụ này suviendo cường độ Thiên Chúa ban phúc lành cho
Tôi mới lập trình haci làm dự án của tôi.
Public class Form1
Tin giờ As Integer = 0
Riêng phút As Integer = 0
Tư nhân thứ As Integer = 0
Riêng phần nghìn giây As Integer = 0
Sub printTime ()
Label1.Text = hora.ToString.PadLeft (2, "0") & ":"
Minuto.ToString.PadLeft Label1.Text & = (2, "0") & ":"
Segundo.ToString.PadLeft Label1.Text & = (2, "0") & ":"
Milisegundo.ToString.PadLeft Label1.Text & = (1, "0")
Label1.Refresh ()
End Sub
Timer1_Tick Private Sub (ByVal sender As System.Object, ByVal e Như System.EventArgs) Handles Timer1.Tick
+ = 1 mili giây
Sau đó, nếu phần nghìn giây = 9
phần nghìn giây = 0
2 + = 1
Nếu giây = 59 Sau đó,
2 = 0
+ = 1 phút
Sau đó, nếu = 59 phút
phút = 0
giờ + = 1
Cuối Nếu
Cuối Nếu
Cuối Nếu
printTime ()
End Sub
Private Sub Button1_Click (ByVal sender As System.Object, ByVal e Như System.EventArgs) Handles Button1.Click
Timer1.Enabled = True
End Sub
Private Sub Button2_Click (ByVal sender As System.Object, ByVal e Như System.EventArgs) Handles Button2.Click
Timer1.Enabled = False
End Sub
Button4_Click Private Sub (ByVal sender As System.Object, ByVal e Như System.EventArgs) Handles Button4.Click
Cuối
End Sub
Cảm ơn bạn rất nhiều vì những đóng góp
Code!
Tốt mã .... tôi phục vụ hoàn hảo trên sửa chữa các lỗi .... nhờ
cảm ơn vì những đóng góp của bạn phục vụ tôi rất hữu ích
Xin chào bạn quisioera biết nơi bạn làm cho blog của bạn?? Trang này?
Bạn có thể giúp tôi
Hi
Tôi làm điều này blog tại Buenos Aires, Argentina. Chúc mừng.
Tôi chạy nhờ tuyệt vời tuyệt vời để aora hướng dẫn của bạn và tôi có một ý tưởng làm thế nào để sử dụng các bộ đếm thời gian.
mã grax x
zi zirvio tôi!
○ ^ ^
cảm ơn cho các mã này, tôi đang lập trình jejej một cái gì đó lớn hơn
nhờ ...
tuyệt vời mã đặc biệt hữu ích để phát triển một số ứng dụng để theo dõi thời gian chờ đợi của một quá trình
Cảm ơn rất nhiều
bất cứ điều gì!
và nếu tính là nghiêm trọng?
Một ví dụ rất tốt, tôi đã đúc trong c + + lập trình với profresor của tôi nhưng không có ý tưởng trong đầu vào hình ảnh nhờ basic.net rất đơn giản và rất atractivo.Gracias
chỉ là một điều rất tốt, nút thiết lập lại nếu bạn bấm được thiết lập là 0 nhưng vẫn hết thời gian cho điều đó một mình, bạn sẽ phải đặt
Btn_reset_Click Private Sub (ByVal sender As System.Object, ByVal e Như System.EventArgs) Handles btn_reset.Click
Timer1.Enabled = False
thời gian = 0
phút = 0
2 = 0
phần nghìn giây = 0
printTime ()
End Sub
Hi ân sủng cho những đóng góp
Tôi muốn biết làm thế nào để thích ứng với ASP với VB từ bằng cách sử dụng trang mã đang làm postback
Cảm ơn
cảm ơn rất nhiều, tôi đang tìm kiếm
VERY GOOD THÔNG TIN lưu từ Trouble A
..
..
THANKS
Cảm ơn bạn rất nhiều vì những đóng góp. Họ là rất rõ ràng và rất tốt.
Đóng góp rất tốt, là những gì tôi đang tìm kiếm!
cảm ơn
Bạn có thể cho tôi biết như bạn đã làm với label1.refresh ()
Cảm ơn bạn.