dcsimg
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Aug 6, 1997

WEBINAR:

On-Demand

Building the Right Environment to Support AI, Machine Learning and Deep Learning


Cool Screen Wipes

You can achieve some cool form wipes with judicious use of the Move method. For example, to draw a curtain from right to left use this routine:
 Sub WipeRight (Lt%, Tp%, frm As Form)
	Dim s, Wx, Hx, i
	s = 90 'number of steps to use in the wipe
	Wx = frm.Width / s 'size of vertical steps
	Hx = frm.Height / s 'size of horizontal steps
	' top and left are static 
	' while the width gradually shrinks
	For i = 1 To s - 1
		frm.Move Lt, Tp, frm.Width - Wx
	Next
End Sub
Call the routine from a command button by using this code:
 L = Me.Left
T = Me.Top
WipeRight L, T, Me
It is also possible to wipe a form from bottom to top, and from both sides to the middle, using similar routines.
David Mawson
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date