Visual Basic Picture and Timer Example

Path :: Home :: Bca & Mca :: Bca Assignments Help :: 2008 :: CS-65 Free Answers

Q. Create a form with a picture box. Find some interesting pictures. Use a timer control to cycle the pictures every 2 seconds. The form should close when the Picture is clicked.

Answer submitted by a student

Private Sub Form_Load()
Me.File1.Path = "C:\Image"
End Sub

Private Sub Picture1_Click()
End
End Sub

Private Sub Timer1_Timer()
For i = 0 To 3 Step 1
Me.File1.Selected(i) = True
Me.Picture1.Picture = LoadPicture(Me.File1.Path + "\" + Me.File1.FileName)
Next
End Sub

<< Previous Answer

Next Answer >>