小辉用Visual Basic制作了一个动画程序,部分程序代码如下所示
Dim a As Integer
Private Sub Command1_Click()
Timer1.Enabled = True
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
a = a + 1
Image1.Picture = LoadPicture(App.Path & "" & a & ".jpg")
If a >= 8 Then a = 0
End Sub
单击命令按钮Command1,加框处语句执行的时间间隔为( )