المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : مثال فتح الفورم بشكل جميل


eshrag.net
07-29-2010, 11:13 AM
مثال فتح الفورم بشكل جميل

اولا يكون عندنا 2 timer

ثانيا نظبط خاصية enabled في تيمر واحد فقط على true

ليكون الكودفي timer1

Me.Width = Me.Width + 2

If Me.Width = 666 Then
Timer1.Enabled = False
Timer2.Enabled = True
'Form1.Show()
End If

اما في timre2

Me.Height = Me.Height + 1

If Me.Height = 205 Then
Timer2.Enabled = False
Form2.Show()
End If
وده مثال httpprogrammerwitvbdotnet.*************