uhrzeit und datum ständig anzeigen

  • VB.NET

Es gibt 14 Antworten in diesem Thema. Der letzte Beitrag () ist von Lupus.

    uhrzeit und datum ständig anzeigen

    hi

    bin schon beim verzweifeln. finde auf der msdn-seite, und auch bei google und sogar mit der sufu in diesem forum nichts.

    ich möchte gerne, dass in der statuszeile meiner anwendung in einem lable die urzeit angezeigt wird (also dauernd zählen) und in einem zweiten lable soll das aktuelle datum angezeigt werden. das ganze soll ohne click oder sonstiges funktionieren.

    danke für eure hilfe

    habe es mittlerweile hinbekommen. funktioniert auch richtig, habe jetzt nur noch eine formatierungsfrage: wie bekomme ich es hin, dass die sekunden 0-9 nicht als 0,1,2,3,4,5,6,7,8,9 angezeigt werden, sondern so: 00,01,02,03,04,05,06,07,08,09.

    hier mein code:

    VB.NET-Quellcode

    1. Private Sub
    2. lblZeit_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblZeit.LocationChangedlblZeit.Text = DateTime.Now.Hour & ":" & DateTime.Now.Minute & ":" & DateTime.Now.Second
    3. Dim timer As New Timer With {.Interval = 1000}AddHandler timer.Tick, AddressOf Tick
    4. timer.Start()
    5. End Sub
    7. Private Sub Tick()
    8. lblZeit.Text = DateTime.Now.Hour & ":" & DateTime.Now.Minute & ":" & DateTime.Now.Second
    9. End Sub

    oder geht das anders ???

    VB.NET-Quellcode

    1. Dim TheTime As String = My.Computer.Clock.LocalTime.ToString("hh:mm:ss")
    2. Dim TheDate As String = Now.ToString("dd.MM.yyyy")


    Now.ToString("hh:mm:ss") giebt bei 20:00:00 Uhr -> 08:00:00 zurück
    Deshalb Clock.LocalTime, Kann man sicher umgehn aber sry, kA wie :P :P

    MfG

    hallo,

    ich hatte mir auch mal aus langeweile eine uhr mit datum
    programmiert, habe das so "gelöst" :

    VB.NET-Quellcode

    1. Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    2. Dim h, m, s As String
    3. h = My.Computer.Clock.LocalTime.Hour
    4. m = My.Computer.Clock.LocalTime.Minute
    5. s = My.Computer.Clock.LocalTime.Second
    7. If h < 10 Then
    8. h = "0" + h
    9. End If
    10. If m < 10 Then
    11. m = "0" + m
    12. End If
    13. If s < 10 Then
    14. s = "0" + s
    15. End If
    17. Label1.Text = h
    18. Label2.Text = m
    19. Label3.Text = s
    20. End Sub


    hab jetzt nur mal die uhrzeit genommen, weil ich das mit dem datum bissl
    umständlich gemacht habe und der code ein wenig länger ist und
    schwer durchzublicken, es geht ja eh um die uhrzeit ;)


    mfg
    lexeaus

    das ist doch eig auch kein probem:

    VB.NET-Quellcode

    1. MsgBox(Format(Now, "hh:mm"))

    VB.NET-Quellcode

    1. MsgBox(Format(Now, "s"))

    oder halt ändern, wie dus brauchst. Kannste dir viel Text sparen!

    Format ist ein Befehl, um ein bestimmten Wert in ein angegebenes String-Format zu bringen. Also sozusagen gibst du in dem String an, wo welche Werte stehen sollen.
    Aber jedem das Seine :D

Facebook
Telefonspende