منتديات المنة

منتدى خاص بالأورجات شراء - بيع - تبادل أصوات
 
الرئيسيةالبوابةمكتبة الصورالتسجيلدخول

شاطر | 
 

 فتح الفورم بطريقة رائعة

اذهب الى الأسفل 
كاتب الموضوعرسالة
mefayed
مدير عام المنتدى
مدير عام المنتدى
avatar

عدد الرسائل : 495
تاريخ التسجيل : 07/11/2006

مُساهمةموضوع: فتح الفورم بطريقة رائعة   الخميس ديسمبر 07, 2006 5:32 pm

فتح الفورم بشكل جميل
فى الاجراء العام
general
نكتب الكود التالى
Sub Explode(form1 As Form)
form1.Width = 0
form1.Height = 0
form1.Show
For x = 0 To 5000 Step 1
form1.Width = x
form1.Height = x
With form1
.Left = (Screen.Width - .Width) / 2
.Top = (Screen.Height - .Height) / 2
End With
Next
End Sub
ثم فى ناقذة الفورم فى الإجراء
load
نكتب الكود التالى
Private Sub Form_Load()
Explode Me
End Sub
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://mady.niceboard.com
 
فتح الفورم بطريقة رائعة
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات المنة :: قسم التكنولوجيا المتطورة :: منتدى الفيجوال بيزك-
انتقل الى: