在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时设置其计时器间隔为1秒、计时器触发事件过程则实现在Text1 文本框中动态显示当前日期和时间。请补充完整。
Private Sub Form_Load()
Me.TimerInterval=1000
End Sub
Private Sub ______
Me.Text1=Now()
End Sub