مرحبا بكم فى موقعكم التعليمى مفيدا ومستفيدا

الاختفاء التدريجى للفورم

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

الاختفاء التدريجى للفورم

مُساهمة من طرف sayed في الجمعة مارس 15, 2013 2:49 pm

شوف معايا الكود دة
وجرب
Dim iCount As Integer

For iCount = 900 To 10 Step -10
Me.Opacity = iCount / 1000
Me.Refresh
(Threading.Thread.Sleep(50
Next

Me.Close
Very Happy

_________________
عام سعيد وكل عام وانتم على خير والى الله أقرب
avatar
sayed
Admin

عدد المساهمات : 190
تاريخ التسجيل : 10/10/2011
العمر : 62
الموقع : computer.hooxs.com

http://computer.hooxs.com

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى