Cool screen wipes

By | 2002-06-01

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. It is also possible to wipe a form from bottom to top, and from both sides to the middle, using similar routines

Original Author: VB Pro

Code

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

Author: dwirch

Derek Wirch is a seasoned IT professional with an impressive career dating back to 1986. He brings a wealth of knowledge and hands-on experience that is invaluable to those embarking on their journey in the tech industry.

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.