2.1.3Thêm tính năng Clock
Tính năng kế tiếp là hiển thị giờ. Ta sẽ dùng điều khiển ActivateX Timer là một điều khiển nội tại của Visual basic. Điều khiển nội tịa luôn được nạp sẵn trong hộp công cụ.
Thêm Timer vào ứng dụng
Chọn vào biểu tượng trong hộp công cụ
Nhấn chuột lên điều khiển Timer trên hộp công cụ để đưa nó vào biểu mẫu.
Để hiển thị thời gian ta lập trình điều khiển Timer. Ta dùng thuộc tính Interval của timer để quy định việc đếm thời gian. Một đơn vị của Interval là 1/1000 giây. Do đó, để quy đinh nhịp đếm là nửa giây ta đặt Interval là 500. Cứ mỗi nửa giây chương trình sẽ làm một việc gì đó. Ở đây, ta muốn hiển thị thời gian hiện hành. Ta sẽ dùng nhãn (label) để hiển thị thời gian.
Hiển thị Timer
Thêm Label vào biểu mẫu.
Chọn điều khiển nhãn từ hộp công cụ và kéo nó vào biểu mẫu.
Thủ tục sự kiện là gì?
Một thủ tục sự kiện là một đoạn chương trình sẽ thi hành khi sự kiện đó xảy ra. Ví dụ, khi người sử dụng nhấn vào nút CommandButton, sự kiện click() sẽ được sinh ra. Visual basic cung cấp thủ tục CommandButton_Click cho ta lập trình để ứng dụng phản ứng đối với việc nhấn nút CommandBuuton. Tương tự với Timer. Khi đúng nhịp đếm Timer sự kiện Timer() sẽ phát ra.
Để hiển thị thời gian trên nhãn label ta đưa dòng lệnh sau vào thủ tục sự kiện của timer: Label1.Caption = time
Private Sub Timer1_Timer()
Label1.Caption = Time
End Sub
Chia sẻ với bạn bè của bạn: |