Form zoom code?

  • Thread starter Thread starter Dean Slindee
  • Start date Start date
D

Dean Slindee

Anybody have a source for .NET code to zoom a form from a dot to full size?
Probably passe since form opaque, but I may have a good use for it.

Thanks in advance,
Dean Slindee
 
Hi Dean,

Based on my understanding, you want to zoom a form for width and height of
1 to the fullsize.

Here I write a smaple for you.

Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Timer1.Tick
If Me.Width >= 300 Then
Me.Timer1.Stop()
Me.FormBorderStyle = FormBorderStyle.Sizable
End If
Me.Width += 5
Me.Height += 5
End Sub

Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Me.Width = 0
Me.Height = 0
Me.FormBorderStyle = FormBorderStyle.None 'This one is necessary.
End Sub
If you have any concern on this issue, please post here.

Regards,
Peter Huang
Microsoft Online Partner Support
Get Secure! www.microsoft.com/security
This posting is provided "as is" with no warranties and confers no rights.
 
Hi Bob,

Thank you for you suggestion.
My sample is just for demo purpost.

Use the Size in the Timer event will be better.
sz += 1
Me.Size = New Size(sz, sz)

If you have any concern on this issue, please post here.

Regards,
Peter Huang
Microsoft Online Partner Support
Get Secure! www.microsoft.com/security
This posting is provided "as is" with no warranties and confers no rights.
 
Back
Top