Resize کردن فرم

[myazdan]

سلام به همه

من یک دونه فرم دارم که خاصیت FormBorderStyle=none ، حالا من میخوام که این فرم رو Resize کنم .چطوری باید این کار رو انجام بدم ؟

با تشکر

[xxnagin]

یه Label پایین فرم بذار

PrivateSub Label1_MouseDown(ByVal sender AsObject, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseDown
If e.Button = MouseButtons.Left Then
Label1.Cursor = Cursors.PanNW
EndIf
EndSub
PrivateSub Label1_MouseMove(ByVal sender AsObject, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseMove
If e.Button = MouseButtons.Left Then
Me.SetBounds(Me.Location.X, Me.Location.Y, (Control.MousePosition.X - (Me.Left)) + 10, (Control.MousePosition.Y - Me.Top) + 10)
Me.Refresh()
EndIf
EndSub
PrivateSub Label1_MouseUp(ByVal sender AsObject, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseUp
Label1.Cursor = Cursors.Default
EndSub

[ahmadreza517]

سلام
از این کد میتونی استفاده کنی


Me.Size(100,100)