用什么办法在三个文本框中分别读取time中的小时,分,妙?

Question

Now 函数
      返回一个 Variant (Date)，根据计算机系统设置的日期和时间来指定日期和时间。语法Now
Time 函数
      返回一个指明当前系统时间的 Variant (Date)。语法Time说明为了设置系统时间，请使用 Time 语句。
 
Hour 函数
      返回一个 Variant (Integer)，其值为 0 到 23 之间的整数，表示一天之中的某一钟点。语法Hour(time)必要的 time 参数，可以是任何能够表示时刻的 Variant、数值表达式、字符串表达式或它们的组合。如果 time 包含 Null，则返回 Null。 
Minute 函数
      返回一个 Variant (Integer)，其值为 0 到 59 之间的整数，表示一小时中的某分钟。语法Minute(time)必要的 time 参数，可以是任何能够表示时刻的 Variant、数值表达式、字符串表达式或它们的组合。如果 time 包含 Null，则返回 Null。 
Second 函数
      返回一个 Variant (Integer)，其值为 0 到 59 之间的整数，表示一分钟之中的某个秒。语法Second(time)必要的 time 参数，可以是任何能够表示时刻的 Variant、数值表达式、字符串表达式或它们的组合。如果 time 包含 Null，则返回 Null。

Answer 1

Private Sub Timer1_Timer()
Text1.Text = Format(Now, "hh")
Text2.Text = Format(Now, "mm")
Text3.Text = Format(Now, "ss")
End Sub