كود جميل عطي للفورم شكل لذيذ جدا عند التشغيل
sub explode (form1 as form)
form1.width =0 : form1.height = 0 : form1.show
for x= 0 to 4000 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
الكود السابق هايكون في الجينرال تمام
وفي الفورم لود نكتب
Explode me
الإثنين يناير 14, 2008 10:58 pm
