by SYED ZUBAIR ALI (7 Submissions)
Category: Graphics
Compatability: Visual Basic 4.0 (32-bit)
Difficulty: Unknown Difficulty
Originally Published: Sat 15th August 2009
Date Added: Mon 8th February 2021
Rating:
(1 Votes)
Animation using series of pictures
'path file to take moon image as below: 'C:\ProgramFiles\MicrosoftVisual\Studio\Common\Graphics\Icons\Elements
'take a timer, interval 50, take a label box..and caption it "Loading Please 'Wait.
'take a command button and give any task to this button.
'now paste this code..
----------------------------------------------------------------------------
Private Sub Command1_Click()
Unload Me
Timer1.Enabled = False
End Sub
Private Sub Form_Load()
mnFrame = 0
End Sub
Private Sub Timer1_Timer()
imgbusy.Visible = True
mnFrame = mnFrame + 1
If mnFrame > 7 Then mnFrame = 0
imgbusy.Picture = ImgFrame(mnFrame).Picture
End Sub
'if any problem plz email me. [email protected]