منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كود تدرج الالوان
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمه الله وبركاته عايز كود تدرج الالوان  في ليبل؟ بس بطريقه مسح تدريجي للون عشان يبقي. افضل
(13-08-22, 11:00 PM)حسن الجلب كتب : [ -> ]
PHP كود :
Imports System.Drawing.Drawing2D
Public Class Form1
    Private Sub Label3_Paint
(sender As ObjectAs PaintEventArgsHandles Label3.Paint
        Dim TextSize 
As SizeF e.Graphics.MeasureString(Label3.TextLabel3.Font)
 
       Dim Rct As New Rectangle(00Convert.ToInt32(Label3.Width), Convert.ToInt32(Label3.Height))
 
       Dim GradienBrush As New Drawing2D.LinearGradientBrush(RctColor.WhiteColor.RedDrawing2D.LinearGradientMode.Horizontal)
 
       e.Graphics.DrawString(Label3.TextLabel3.FontGradienBrush00)
 
   End Sub
End 
Class 
السلام عليكم ورحمه الله وبركاته عايز كود تدرج الالوان  في ليبل؟ بس بطريقه مسح تدريجي للون عشان يبقي. افضل
تفضل هذا الكود معدل و مجرب
ظنيته يقصد الكود التالي:
PHP كود :
 Dim rnd As New Random
Private Function rcolor()
 
       Return Color.FromArgb(255rnd.Next(255), rnd.Next(255), rnd.Next(255))
 
   End Function 
لا حضرتك الكود ده انا فعلا عملت واحد زيه ولكن أنا عاوز كود تدرج اللون عن طريق المسح التدريجي هجري الكود الاولاني وأشوف علي العموم شكرا لحضرتك