تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طريقة لعمل فورم دائري
#1
كاتب الموضوع : AhmedEssawy

منقول من المنتدى القديم .


كود :
Private Sub formcircle(frm As Form, Size As Integer)

For e% = Size% - 1 To 0 Step -1
frm.Left = frm.Left - e%
frm.Top = frm.Top + (Size% - e%)
Next e%

For e% = Size% - 1 To 0 Step -1
frm.Left = frm.Left + (Size% - e%)
frm.Top = frm.Top + e%
Next e%

For e% = Size% - 1 To 0 Step -1
frm.Left = frm.Left + e%
frm.Top = frm.Top - (Size% - e%)
Next e%

For e% = Size% - 1 To 0 Step -1
frm.Left = frm.Left - (Size% - e%)
frm.Top = frm.Top - e%
Next e%
End Sub
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تفعيل caps lock عند فتح فورم معين(((فيجوال بيسك 6)))) سانسيفا 8 2,039 26-08-13, 05:06 PM
آخر رد: مهند إلكترو
  طريقة لجعل الفورم او البرنامج في مقدمة البرامج Ahmad Jawad 0 817 28-10-12, 11:39 AM
آخر رد: Ahmad Jawad
  طريقة سهلة للحذف من جدولين في قاعدة البيانات RaggiTech 0 566 17-10-12, 03:39 PM
آخر رد: RaggiTech
  طريقة تصفير الجدوال في قواعد البيانات (تصفير قاعدة البيانات) RaggiTech 0 811 17-10-12, 03:37 PM
آخر رد: RaggiTech
  طريقة تكبير الصور عند المرور على Label بالماوس... سهلة وبسيطة RaggiTech 0 760 17-10-12, 02:34 PM
آخر رد: RaggiTech
  لعمل فورم شفاف باستخدام فيجوال بيسك RaggiTech 0 615 17-10-12, 12:58 AM
آخر رد: RaggiTech
  لعمل List باسماء اتصالات Dail-up التي لديك RaggiTech 0 291 17-10-12, 12:57 AM
آخر رد: RaggiTech
  لعمل Enable و Disable لزر X في الفورم RaggiTech 0 327 17-10-12, 12:57 AM
آخر رد: RaggiTech
  طريقة للبحث عن الملفات RaggiTech 0 318 17-10-12, 12:46 AM
آخر رد: RaggiTech
  طريقة عمل Scroll bars للفورم RaggiTech 0 515 17-10-12, 12:45 AM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم