vb.net - 获取当前时间以显示在标签中。VB.net

Question

我正在尝试为工作构建一个休息跟踪器，我想获得一个按钮来在标签中显示当前时间。我尝试了多种解决方案，这就是我所取得的成就。

Sub AddButtonClick(sender As Object, e As EventArgs)        
        Dim Start as Integer
        System.DateTime.Now = Start
        total.Text = Start      
End Sub

当我这样做时，我得到属性“现在”是只读的错误。

Answer 1

这里有几个问题：

• 你的任务是错误的；您正在尝试分配一个值DateTime.Now而不是Start
• DateTime.Now是 type 的值DateTime，not Integer，所以分配无论如何都不会工作
• 无论如何都不需要Start变量；它没有用
• total.Text是类型的属性String- 不是DateTime 或 Integer

（其中一些只会在执行时出现，除非你有Option Strict，你真的应该这样做。）

你应该使用：

total.Text = DateTime.Now.ToString()

...如果您想要特定格式的结果，可能会指定文化和/或格式说明符。

Answer 2

试试这个.....

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load    
    Timer1.Start()
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Label12.Text = TimeOfDay.ToString("h:mm:ss tt")
End Sub

Answer 3

尝试

total.Text = DateTime.Now.ToString()

或者

Dim theDate As DateTime = System.DateTime.Now
total.Text = theDate.ToString()

当您尝试将 a放入其中时，您声明Start为a ，这是不可能的。IntegerDateTime

Answer 4

使用Date.Now代替DateTime.Now