A.Private Sub Timer1_Timer() Labell.Caption=True End Sub B.Private Sub Timer1_Timer() Labell.Caption=Time$ End Sub C.Private Sub Timer1_Timer() Labell.Interval=1 End Sub D.Private Sub Timer1_Timer() For k=1 To Timerl.Interval Label1.Caption=Timer Next K End Sub