------------- مسابقة للجميع ------------

اللهم طولك ياروح :D :D

ما احنا روحنا قسم ال vb6 و عملنا نفس المسابقة و في الاخر خدنا صابونة :lol:

لكن ماشي يمكن الموضوع يمشي المرة دي

اسمحولي بشرف أن أكون أول المتقدمين، هوا صراحة الكود معروف و لكن دمج التصميم بالبرنامج جعله يبدو رائعا، هذا البرنامج عملته من سنتين و كنت مبتدئا، ربما مازلت :D ، المهم سأضيف صورة البرنامج و الكود و كذلك الملف التنفيذي

(لا صور، لا أدوات خارجية، لا مكتبات، لا داعي للقلق علي رأي واحد صاحبنا :lol: )

صورة البرنامج

---------------

مرفق البرنامج نفسه

الكود

___

 Friend Sub lineargradientbrush()
        Dim grbrush As System.Drawing.Drawing2D.LinearGradientBrush
        grbrush = New System.Drawing.Drawing2D.LinearGradientBrush(New Point(0, 0), New Point(Me.Width, Me.Height), Color.Firebrick, Color.Cyan)
        Me.CreateGraphics.FillRectangle(grbrush, New Rectangle(0, 0, Me.Width, Me.Height))
    End Sub

bin.zip

ايه يا جماعة المسابقة فاضية ليه كده؟

بـــــــدون تعليــــــــــــــــــــــــق <_< :( :angry: :s :wacko: :blink: :unsure: :angry: <_<