文本塊代碼麻煩的日期和時間VB的Windows

Question

公共NotInheritable類的MainPage 繼承頁

Private Sub textblock1_SelectionChanged() Handles textblock1.SelectionChanged 
    textblock1.Text = Date.Now.ToString("MM/d/yyyy") 
    textBlock2.Text = Date.Now.TimeOfDay.ToString("HHmmss") 

End Sub 

末級

我想讓顯示的時間（以小時爲單位的Windows應用程序：分鐘：秒）以及兩個文本框中的當前日期，因爲我無法將標籤顯示在我的工具箱中。但是，當我運行此代碼時，文本塊文本不會進入時間和日期，而是仍然讀取「TextBlock」，數字出現在右上角'060 001'和左上角'000 000'中。我究竟做錯了什麼？

這是一個Windows 8.1的應用程序，而不是Windows手機。

Answer 1

我希望這可以幫助你...嘗試在你的窗體中創建一個計時器。並在您的計時器內，複製此代碼...不要忘記將計時器的屬性啓用設置爲「真」

 textBlock1.Text = Format(Now, "h:mm:ss tt") 
    textblock2.Text = Format(Now, "MMMM d, yyyy") 

End Sub