quite a cool way to load a form....well i thought so :)

by p_roducer (2 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 11^th July 2001
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate quite a cool way to load a form....well i thought so :)




Private Sub Form_Load()
Timer1.Enabled = True
End Sub

Private Sub Label2_Click()
Me.WindowState = 1
End Sub

Private Sub Label3_Click()
Unload Me
End Sub

Private Sub Timer1_Timer()
Counter = Counter + 50   'amount
Form1.Height = Counter
Form1.Width = Counter
If Counter = "3500" Then
Timer1.Enabled = False
End If
End Sub

Download this snippet Add to My Saved Code

quite a cool way to load a form....well i thought so :) Comments

No comments have been posted about quite a cool way to load a form....well i thought so :). Why not be the first to post a comment about quite a cool way to load a form....well i thought so :).

quite a cool way to load a form....well i thought so :)

quite a cool way to load a form....well i thought so :) Comments

Post your comment

Difficulty