'************************************** ' Name: !!!!***Cool Roll***!!!! ' Description:This is a really cool effe ' ct that you can add to make it so that w ' hen you click a minimize button, the for ' m slides off the screen and a little min ' i form appears in the bottom left hand c ' orner. When you click this mini forms ti ' tle bar, the form appears again. A Very ' cool effect that I just figured out. (o: ' ' By: SeeD (from psc cd) ' ' ' Inputs:Follow these instructions. 1) Start up a new project in your VB. 2) Add a new form. (Form2) 3) Add a timer to Form 1 and set it's interval to 1 by pressing F4 to access the properties. 4) Make Form 1's Border Style "0 - None" and make Form 2's Border Style"3 - Fixed Dialog". 5) Add a Label to Form 1. (Label1) Make it's caption "_" (For Minimize) 6) Make Form2's Property "ControlBox = False". 7) Make Form2's Property "Movable = False". 8) And MOST IMPORTANTLY, make Form2's Property "WindowState = "Minimized" 9) That's all, but remember to MINIMIZE YOUR VB WHEN RUNNING THIS CODE. Thanks. (o: ' ' Returns:none ' 'Assumes:none ' 'Side Effects:none '************************************** 'Put this in Form1's General Declaration ' s. Private Sub Label1_Click() Timer1.Enabled = True Form2.Visible = True End Sub Private Sub Form_Load() Timer1.Enabled = False End Sub Private Sub Timer1_Timer() Form1.Top = Form1.Top + 60 'You can adjust the 60 to whatever you prefer. Highering it will make the form drop faster. (o: Form2.Enabled = True End Sub 'Put this in Form2's General Declaration ' s. (o: Private Sub Form_Activate() Form1.Show Form2.Hide Form1.Top = (Screen.Height - Height) / 2 Form1.Left = (Screen.Width - Width) / 2 Form1.Timer1.Enabled = False End Sub