'100豪秒更新一次100ns欄位
    Private Sub Timer1_Event() Handles Timer1.Tick
        tb_100ns.Text = Now.Ticks
    End Sub
    '1000豪秒更新一次其他欄位
    Private Sub Timer2_Tick(sender As System.Object, e As System.EventArgs) Handles   Timer2.Tick
        tb_now.Text = Now
        tb_Date.Text = Now.Date
        tb_Hour.Text = Now.Hour
        tb_min.Text = Now.Minute
        tb_sec.Text = Now.Second
        tb_total_min.Text = Now.TimeOfDay.TotalMinutes
    End Sub