VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Open your form in the style of curtain of Cinema Hall dropping from up to bottom

by shailesh bansal (3 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 6th November 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Open your form in the style of curtain of Cinema Hall dropping from up to bottom

Rate Open your form in the style of curtain of Cinema Hall dropping from up to bottom



Private Sub Form_Load()
    Form1.Height = 510 'initial height of form in the
    'BordorStyle=2-sizable window
    actualheight = 5110
    Timer1.Enabled = True
    Timer1.Interval = 100
    
End Sub

Private Sub Timer1_Timer()
    step = 50 ' must be factor of actualheight
    Me.Height = Me.Height + step
    If Me.Height > actualheight Then
        Timer1.Enabled = False
    End If
End Sub


Download this snippet    Add to My Saved Code

Open your form in the style of curtain of Cinema Hall dropping from up to bottom Comments

No comments have been posted about Open your form in the style of curtain of Cinema Hall dropping from up to bottom. Why not be the first to post a comment about Open your form in the style of curtain of Cinema Hall dropping from up to bottom.

Post your comment

Subject:
Message:
0/1000 characters