This is a cool form effect, it shrinks the form, both height and width.

by VisualBlind (12 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 26^th July 2000
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate This is a cool form effect, it shrinks the form, both height and width.



Private Sub Command1_Click()
'Code thought up for no reason at all by VisualBlind
'No matter what height/width your form is, it will always
'shrink the form :)
'This would be great for a about windows after the user closes it
'you should put this in the form/unload procedure...

Do Until Form1.Height = 405 And Form1.Width = 1680
Form1.Height = Form1.Height - 1
Form1.Width = Form1.Width - 1
Loop
Unload Me
End Sub

Download this snippet Add to My Saved Code

This is a cool form effect, it shrinks the form, both height and width. Comments

No comments have been posted about This is a cool form effect, it shrinks the form, both height and width.. Why not be the first to post a comment about This is a cool form effect, it shrinks the form, both height and width..

This is a cool form effect, it shrinks the form, both height and width.

This is a cool form effect, it shrinks the form, both height and width. Comments

Post your comment

Difficulty