• Home
 · 
• Miscellaneous
 · 
• Makes a form expand to desired size on load.

Makes a form expand to desired size on load.

Makes a form expand to desired size on load.

Rate Makes a form expand to desired size on load.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'otherwise the starting number + 10 might not add up to the number
'you want it to start at

Private Sub Form_Load()
Form1.Height = 450
End Sub

Private Sub Timer1_Timer()
If Form1.Height = 2250 Then
Form1.Timer1.Enabled = False
Else
Form1.Height = Form1.Height + 10
End If
End Sub