以下程序的功能是每隔一定的时间在窗体的文本框中显示当前时间,刷新的时间间隔由滚动条来设定。窗体中有三个控件:文本框控件Text1用来显示当前时间,水平滚动条控件Hscroll1用来设置Timer1控件发生Timer事件的时间间隔,计时器控件Timer1用来控制每隔一定的时间在Text1中显示一次时间。程序运行的界面如图20-11所示,代码如下,请填空。
Private Sub HScroll1_Change() Timer1.Interval= 【8】 End Sub Private Sub Timer1_ 【9】 () Text1.Text=Time End Sub