by chandra mohan (3 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 11th May 2007
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
This tiny code enables you to change the picture in picture box at specified timer interval
API Declarations
command1 caption-ENTER
right click the imagelists and add 2 pictures on each of them
set timer interval to 1000
VBcoders
Private Sub command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Timer1_timer()
Static blnImage1 As Boolean
Static blnImage2 As Boolean
If blnImage1 Then
Picture1.Picture = ImageList1.ListImages(1).Picture
Else
Picture1.Picture = ImageList1.ListImages(2).Picture
End If
blnImage1 = Not blnImage1
If blnImage2 Then
Picture2.Picture = ImageList2.ListImages(1).Picture
Else
Picture2.Picture = ImageList2.ListImages(2).Picture
End If
blnImage2 = Not blnImage2
End Sub
No comments have been posted about This tiny code enables you to change the picture in picture box at specified timer interval. Why not be the first to post a comment about This tiny code enables you to change the picture in picture box at specified timer interval.