Question

vb中单击command按钮后即可在对应的text文本框内显示即时时间

利用以下源码
Text1.Text = Hour(Time) & ":" & Minute(Time)
想要在text文本框中单击command按钮后显示出时间和分钟数
但即时实践中有0时，0无法显示
如：13:05时，只在文本框中显示13:5
原因是什么呀？请高人指点！

Answer 1

Private Sub Command1_Click()
Text1.Text = Format(Now, "yyyy年mm月dd日 hh时nn分ss秒")
End Sub

上面的format函数是格式化函数，前面的Now是当前时间，后面的字符串是显示时间格式。字母是标准格式，汉字是直接输出。

Answer 2

Private Sub Command1_Click()
Text1.Text = Format(Hour(Time) & ":" & Minute(Time), "hh:mm")
End Sub