如何在Visual Basic 2008窗體中顯示實際的日期和時間？

我有一個問題，在我的表單中顯示日期和時間。在我的代碼中，我可以顯示錶單載入日期和時間的日期和時間，然後它不會改變。如何在Visual Basic 2008窗體中顯示實際的日期和時間？

例如表格於2014年3月6日1:32:00裝入，表格顯示2014年3月6日1:32:00，即使已經是2014年3月6日1:40:00也不會改變

這是我的聲明：

Dim todaysdate As String = String.Format("{0:yyyy/MM/dd HH:mm}", DateTime.Now) 
curDatelbl.Text = todaysdate

來源

2014-03-06 affirmative19

窗體上放置一個Timer控件，設置它的時間間隔爲1000（1秒），並調用計時器的Tick事件代碼。不要忘記啓用窗體加載定時器（或當你希望它開始滴答作響。）

Private Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick 
    todaysdate = String.Format("{0:yyyy/MM/dd HH:mm}", DateTime.Now) 
    Me.curTimelbl.Text = todaysdate 
End Sub

來源

2014-03-06 14:28:23

謝謝Bradley先生......我跟着你說什麼，但然後它仍然不工作在這裏是我的代碼Private Sub Timer1_Tick_1（ByVal發件人爲System.Object，ByVal e爲System.EventArgs）Handles Timer1.Tick curDatelbl.Text = todaysdate End Sub – affirmative19

您將需要在tick事件中重新計算'todaysdate'。 –

todaysdate = String.Format（「{0：yyyy/MM/dd HH：mm}」，DateTime.Now） –

這段代碼顯示足夠好

Private Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick 
    Me.curTimelbl.Text = TimeOfDay 
End Sub 

Private Sub login_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    Me.Timer1.Enabled = True 
    Me.curDatelbl.Text = todaysdate 
End Sub

來源

2014-03-07 06:49:51 affirmative19

如何在Visual Basic 2008窗體中顯示實際的日期和時間？

回答

相關問題