It is a code regarding how one can perform FORM Animation in VB.

by Vivek Patel (1 Submission)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 29^th July 2003
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate It is a code regarding how one can perform FORM Animation in VB.



    Timer1.Enabled = True
    cmdclick = True
    Form1.Height = 5
    Form1.Width = 5
End Sub

Private Sub Command2_Click()
   Form2.Show
End Sub

Private Sub Form_Load()
    Timer1.Enabled = True
    Command1.Caption = "Fast Animation for Nice effect"
End Sub

Private Sub Timer1_Timer()
  
If cmdclick = False Then
  If Form1.Width <= 6000 Then
  'for horizontal animation
    Form1.Width = Form1.Width + 150
      If Form1.Width >= 6000 Then
        Timer1.Enabled = False
        Form1.Height = 5
        Timer1.Enabled = True
      End If
  Else
  'for vertical animation
     Form1.Height = Form1.Height + 150
      If Form1.Height >= 3135 Then
        Timer1.Enabled = False
      End If
  End If
Else 'cmdclick = true
         If Form1.Width <= 6010 Then
             Form1.Width = Form1.Width + 150
             If Form1.Height <= 3135 Then
                Form1.Height = Form1.Height + 150
             End If
         Else
             Timer1.Enabled = False
         End If
End If
End Sub

Download this snippet Add to My Saved Code

It is a code regarding how one can perform FORM Animation in VB. Comments

No comments have been posted about It is a code regarding how one can perform FORM Animation in VB.. Why not be the first to post a comment about It is a code regarding how one can perform FORM Animation in VB..

It is a code regarding how one can perform FORM Animation in VB.

It is a code regarding how one can perform FORM Animation in VB. Comments

Post your comment

Difficulty