Question

Public NotInheritable Class 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文本不会转到时间和日期，而是仍然显示“TextBlock”，数字显示在右上角的“060 001”和左上角的“000 000”中。我做错了什么？

这是适用于Windows 8.1的应用，而不是Windows手机。

Answer 1

我希望这可以帮助你...尝试在表单中创建一个计时器。在计时器内，复制此代码...不要忘记将计时器的属性启用设置为“True”

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

End Sub

用于Windows的日期和时间vb的文本块代码故障

1 个答案: