디지털 시계 (타이머)

오늘은 Visual Basic에서 만드는 간단하고 쉬운. NET 디지털 시계를 게재하고 싶습니다. 우리는 라벨과 타이머를 사용하여이 작업을 수행합니다.

형태는 다음 이미지의 그것과 유사하게 나타납니다>

오직 시간이 표시됩니다 이러한 예를 들어, 더 많은 중요성을주고 컨트롤 레이블의 글꼴을 변경합니다. 저는 굴림 글꼴 크기 28를 사용하고 있습니다.

이제 타이머 구성 요소 속성을 보자. 타이머 구성 요소의 일정 이벤트에서 코드를 실행하려면이 true로 사용 속성을 가지고 있어야합니다. 그리고 우리는 모든 N 개의 진드기를 실행하려면 코드를 입력하십시오. N의 진드기의 숫자는 밀리초 단위로 표시된 자산과 간격입니다. 우리는 1000 진드기에 속성을 넣어면, 코드는 매 일초가 실행됩니다.

이제 코드는 매우 간단 어디 보자 :

 Timer1_Tick 전용 서브 (System.Object로서 ByVal 발신자 _
 System.EventArgs으로 ByVal e는) Timer1.Tick을 처리
 Label1.Text = Date.Now.ToLongTimeString
 최종 하위

그것은 오직 (F5) 응용 프로그램을 실행하는 유지하고 아래 그림과 같이 우리는 우리의 디지털 시계를해야합니다>

이 블로그의 정기 독자가있다면, 모든 코드 예제는 항상 매우 간단 해요 당신이이 예제에서 개선 보완하여 애플 리케이션에 사용하기 위해 그들을 적응할 수있는 가능성을 가지고 의미 알아.

언제나처럼, 당신은 그것이 유용 바랍니다.

"디지털 시계 (타이머)"에 대한 34 응답

  1. Bitacoras.com는 말합니다 :

    정보 Bitacoras.com ...

    Bitacoras.com 요금 :. 제가 Visual Basic에서 만드는 간단하고 쉬운 인터넷 디지털 시계를 표시하려는 오늘. 우리는 라벨과 타이머를 사용하여이 작업을 수행합니다. 양식은 다음과 내가 비슷합니다 ....

  2. fastmonro는 말합니다 :

    타이머는, 간단한 방법을 필요하지 않습니다 :
    비공개 하위 Form1_Load (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 보낸 사람) 핸들 MyBase.Load

    Me.Label1.Text = 포맷 (지금, "HH : MM : SS TT")
    최종 하위

    • 엘리사는 말합니다 :

      fastmonro :

      입력 고맙지만 그걸로해야 할 일은 그것이 (당신이 Load 이벤트에서 호출로) 양식을로드했을 때 레이블에 "표시"하는 것입니다. 제가 시계의 기능을 달성하거나, 현재 시간을 보여주는 것을 말씀 드리죠 "모든 시간을"시간이 구성 요소 R이 필요하지만, 클럭하지 않습니다 ... 당신을 한 번만 표시합니다.

  3. 알렉 스는 말합니다 :

    당신의 공헌을 아주 좋아! 축하합니다!

  4. Laharl는 말합니다 :

    찾을 뛰어난 기여 형 있지만 문제는 그것이 그냥 #하는 C에서 한 폼의 Load 이벤트에서 동일한 넣어 시계를 표시 시간을 기다리는 실행하면서 수수료를 부과하지 않는다는 것입니다 제가 사용할 수있는 가장입니다
    개인 공극 timer1_Tick (객체 발송인, EventArgs e)를
    {
    DateTime.Now.ToShortTimeString Label.Text = ();
    }

    개인 무효 Form1_Load (객체 발송인, EventArgs e)를
    {
    DateTime.Now.ToShortTimeString Label.Text = ();
    }
    그리고 한 가지 더 누구가 저장하거나 제목 표시줄에서 열리고있는 몇 가지 방법을 시도하고 VB 또는 C #에 있는지 여부를 어떻게해야 할지를 찾을 수없는 파일의 이름을 표시하는 방법을 알고 있습니다.

    salu2

    • batero_loco_xxx는 말합니다 :

      당신 말이 맞아요하지만 클럭 진드기 코드 (기억로드 후 매초마다 하나 혹은 두 번째) 리기, 당신에게 에너지 관두 공은 네 자신에 대해 훨씬 쉽게 트릭을 말씀을 실행할 때 잠시 기다려 관두의 etienes입니다 당신이 양식에 시계의 진드기 넣어 동일한 코드는 다음과 같이 양식을로드 :

      비공개 하위 Form1_Load ....

      Me.Label12.Text = 포맷 (지금, "HH : MM : SS TT")
      엔드 서브

      그리고 당신의 딜레마

      감사합니다

  5. 요한은 말합니다 :

    eliseo .... 단지로 프로그래밍을 시작 누가 우리에게 간단하고 좋은 설명이 코드와 함께 당신을 도울뿐만 감사 ....... 당신은 타이머와 맞다 것은 실현하기 위해 매우 필요합니다 ..

    감사합니다.

  6. 인사는 말한다 :

    좋은 공급!

  7. Henoch는 말합니다 :

    나는 해결책을 잘처럼

  8. 다닐로 말한다 :

    친구 타이머 진드기에 대한 코드를 쳐다보지 않죠? 도와 줘요

  9. Neobones는 말합니다 :

    안녕하세요, 제가 타이머를 사용하여 위에서 설명한대로 사용 속성은 이제 Q가 True로 이동하여 Intervale = 1000 .... 가지고 있습니다 ... 당신은 두 개체를 클릭하여 Timer1 일정 이벤트에 걸립니다 ... 같은 무언가에 코드를 넣어 ...

    공용 클래스 frmPrincipal
    Tiempo_Tick 전용 서브 (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 발신자) Tiempo.Tick을 처리
    txtHora.Text = 포맷 (지금, "HH : MM : SS TT")
    txtFecha.Text = Date.Now.Date
    최종 하위
    최종 클래스

    사실은 내 경우에는 내가 대신 리기 Timer1 시간, 객체의 이름을 변경 ...
    Q 나는 그들이 새로운 프로그래머 도움을 바랍니다.

  10. AlvaroPucela는 말합니다 :

    Cojonuda 당신의 역할이 Neobones! 너무 굉장합니다.

  11. 거리는 말합니다 :

    좋은 친구, 내가 말한대로 여러 번 시도했지만 시계가 제가 25 초마다 업데이 트되는 프로그램을 실행하려면이 실행 업데이 트하려고하고, 장소의 간격 속성 1,000에 있지만, 업데이 트되지 않는다 .
    내가 도울 수 있기를 바랍니다.
    인사.

    • batero_loco_xxx는 말합니다 :

      당신이 언급하는 추측이지만 그것은 시계의 이벤트 진드기용으로 작성된 로직 코드를 habras? 그것은 이것입니다

      Timer1_Tick 전용 서브 (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 발신자) Timer1.Tick을 처리
      Label12.Text = 포맷 (지금, "HH : MM : SS TT")
      최종 하위

  12. Fredy는 말합니다 :

    TA SISAS의 BN YOP 코드 및 장난감 단지 학습 및 NA .. 타이머 ASERLE의 SISAS를 만들려면 어떻게해야하는지 알고 싶어서 ...

  13. 이력서는 말합니다 :

    좀 더 정교한 발보아씨가
    공용 클래스 Form1에
    정수로 희미한 카운트
    비공개 하위 Form1_Load (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 보낸 사람) 핸들 MyBase.Load
    Me.Text은 = "시간 표시"
    Me.Label1.BorderStyle = BorderStyle.FixedSingle
    Me.Label1.TextAlign = ContentAlignment.MiddleCenter
    Me.Label1.Text = ""
    Me.Label1.BackColor = Color.Black
    Me.Label1.ForeColor = Color.Red
    Me.Label1.Visible = False로
    Me.Timer1.Interval = 1000
    = 맞아 Me.Timer1.Enabled
    BackColor = Color.White
    최종 하위
    HoraToolStripMenuitem_click 전용 서브 (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 발신자) HoraToolStripMenuItem.Click을 처리
    = 1에 대응
    최종 하위
    FechaToolStripMenuItem_click 전용 서브 (ByVal sende System.EventArgs으로 객체로서, ByVal 전자) 핸들 FechaToolStripMenuItem.Click
    = 2에 대응
    최종 하위
    Timer1_Tick 전용 서브 (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 발신자) Timer1.Tick을 처리
    Me.Label1.Visible = true를
    카운터 = 1 그리고 Label1.Text = TimeString 경우
    카운터 = 2 그러면 Label1.Text = My.Computer.Clock.LocalTime.Date.ToString 경우
    최종 하위
    최종 클래스

  14. 빅터 cordova는 말합니다 :

    입력을위한 덕분에 완벽하게 작동 : D 제가하고 이걸로 많은 회전하는 데 이러한 몇 라인을 수정했습니다 ... 고마워요 다시!

  15. 구스타보는 말합니다 :

    내게 특히 얼마나 원하는 층으로 엘리베이터 움직이면 타이머 더 많은 연습을 보내하고자

    감사합니다.

  16. 안젤로는 말합니다 :

    시계가 당신이 Timer.Start 양식 ()을 넣어야 할 시작하도록 예제와 같이 정확

    안녕하십니까.

  17. Kadaj는 말했다 :

    funka 타이머지만, 그것이 자원 (프로세서 램 등에 따라 ..) 최적화하기위한 몇 가지 다른 방법으로 이동을 확인하기 위해 작업 관리자를 살펴보면? 일부 Me.Refresh?

  18. 기계를 말했다 :

    Hijes 절 문제 중에 냉각

    나는 데이터베이스 액세스 분야의 매출과 전 순수 명상 남쪽으로 가자, 좀더 따뜻한을 현금을 절단하는 방법에 대한 질문이
    monto_venta입니다
    어떤 예제가있다면 감사합니다

  19. 린은 말합니다 :

    내가 그들의 공헌이 탐침이 xq C 이상의 훌륭한 예입니다 systems'm 내 연습을 위해 시스템을 다하고에서 공학 학생입니다 것은 이것이 기본적인 사실이지만, 이러한 경우 중 C CPU 오프 그에게. hehe

    비공개 하위 Form1_Load (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 보낸 사람) 핸들 MyBase.Load

    Me.Label1.Text = 포맷 (지금, "HH : MM : SS TT")
    최종 하위

    그냥 업데이 트하지 않습니다 나에게 특정 시간을 제공합니다

    Timer1_Tick 전용 서브 (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 발신자) Timer1.Tick을 처리

    LHora.Text = Date.Now.ToLongTimeString

    최종 하위

    이 속성은 타이머 사실 대부분 사실과 1000의 범위이어야하며, 그 경우 모두 완벽하게 작동

  20. 요한은 말합니다 :

    안녕하세요, 같은 대신 웹 사이트에서 웹 양식의 시계, 나는 그것을 볼 수 없습니다 않는 이벤트 timer.start가 존재하지 않습니다 문의할 수 있습니다.

    • 엘리사는 말합니다 :

      문제는 컨트롤의 이벤트가 서버 측에서 실행하며, 그렇게하려고하면 전체 페이지를 다시로드 사실 당신은 클라이언트 측에서해야 reques를해야 해요.

      AJAX 나 jQuery와 자바 (자바 스크립트)를보십시오.

  21. pedrox는 말합니다 :

    grasias 다하지만 난 도움이 필요합니다
    난이 일을해야하지만, 다른 사람이 날 도와 줘요 알고있다면 C에서 # 나는 새로운 programdo 오전.

  22. AloneBoy는 말합니다 :

    안녕하세요 저는 또한 새로운 프로그래밍이고 누군가가 클릭했는데 양식 q를 q를 만드는 방법을 알고 있는지 알고 싶어요은 Linux openSUSE 11.3에서뿐만 아니라 창문 등 투명 이루어집니다

  23. 로레인은 말합니다 :

    수입 ClassLibrary1
    공용 클래스 Form1에
    비공개 하위 Form1_Load (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 보낸 사람) 핸들 MyBase.Load
    Time.Start ()
    최종 하위
    Time_Tick 전용 서브 (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 발신자) Time.Tick을 처리
    새로운 Class1을 낮추기 시간으로
    Horas.hora Label.Text = ()
    '시간 ()
    최종 하위
    '비공개 하위 표준시 ()
    'Label.Text은 = 지금
    '' MessageBox.Show ( "시간을 퍼팅")
    '최종 하위
    최종 클래스

  24. Miauuu는 말합니다 :

    이게 PASSABA 코드를 보면서 ... 그냥 타이머의 코드 ... 약간의 조치를 잡고 나를 완벽하게 일했다 ... MIGUELITO 감사 ...

  25. Oum는 말합니다 :

    이전 코드에 대한 감사는 내가 적응할 수있었습니다.
    funcinó 나를 이렇게 할 수있는 운영 체제로 변경할 시간을 얻을 수있는 코드 ..
    비공개 하위 Form1_Load (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 보낸 사람) 핸들 MyBase.Load

    lblHora.Text = Date.Now.ToLongTimeString
    Timer1.Start ()

    최종 하위

    Timer1_Tick 전용 서브 (System.EventArgs으로 System.Object, ByVal 이메일로 ByVal 발신자) Timer1.Tick을 처리
    lblHora.Text = Date.Now.ToLongTimeString
    최종 하위

  26. ! Juanma가 말한다 :

    그리고 몇 개의 샘플 없음 arribaa funcionaa 데려다 줘! 저는이 안 좋은 것 같아요 : S 전 화면에 시계지만 KE 필요 그래서 후자 oseaa에서 뭔가처럼 보이게 것이다! DD ayudenmeee 0시 0분 0초 :

  27. Jdiaz는 말합니다 :

    안녕 모두, 생각은 타이머에 연구되었으며 내가 본대로 나는 단지 10 1 수준 인터페이스 왔고 투어했습니다 지금까지 엘리베이터를 제어하는​​ 데이를 사용해야하지만, 다시 시작한 후 1-10하고는 안하고 여전히 누군가가 제가 도움이나 적어도 사전에, 감사를 설명할 수 있도록 무언가를 같이 가지고있다면, 버튼이 작동하는 방법을 찾을 수 없습니다.

  28. 캐시는 말합니다 :

    실행 때 타이머를 만들으로서의 내 목록 상자에 단어를 보여줍니다

  29. 하비에르는 말합니다 :

    저는 vb.net 2005 년 창의 도움을 부를 수있는

  30. 라고 :

    Msgbox (timeofday)

논평