انیمیشن برای فرم

[AghaMohsen]

من تونستم برای اینکه وقتی فرم لود میشه ، بهش انیمیشن بدم ، که من از انیمیشن fade استفاده کردم .
اینم کدش :

Public Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Integer, ByVal dwtime As Integer, ByVal dwflags As Integer) As Integer

Public Const AW_BLEND = &H80000



Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        AnimateWindow(Me.Handle.ToInt32, 1000, &H80000)

End Sub

حالا میخوام برای بسته شدن فرم هم این انیمیشن رو بدم ، علم من قد نمیده ، هر کاری کردم نشد .

[Mani_rf]

مطمعن نیستم اما از مقدار &H80000 استفاده کن ببین درست میشه یا نه. البته میدونی که تو FormClosing باید بنویسی دیگه.
البته نمیدونم چرا از خاصیت Opacity خود فرم استفاده نمی کنی اما در هر صورت اگر اون مقدار بالا کار نکرد این لینک کمکت میکنه