[حسن الجلب]

السلام عليكم ورحمه الله وبركاته عايز كود او مصاب لتلوين كلمه معينه بلون معين مثل الفيجوال بيسك

[mohamedallams]

(20-08-22, 12:34 PM)حسن الجلب كتب : السلام عليكم ورحمه الله وبركاته عايز كود او مصاب لتلوين كلمه معينه بلون معين مثل الفيجوال بيسك

وعليكم السلام ورحمه الله وبركاته

لا اعلم ان كنت فهمت سؤالك بشكل صحيح ام لا
لاكن كود التلوين بالفيجوال

كود :

If label1.text = "Hello" Then
label1.ForeColor = Color.Red
End If

[أبو خالد الشكري]

مرحبا بكما

ما يحتاج كل هذا الكود ....

يكفي أن تكتب له هذا الكود إذا كان اللون المطوب أحمرًا 

كود :

label1.ForeColor = Color.Red

أو يمكن تغيير لون Red إلى أي لون آخر مثل Yellow أو Black أو Blue ..... الخ

كما يمكن استبدال أداة Label إلى TextBox مثلا !

[mohamedallams]

(20-08-22, 01:00 PM)أبو خالد الشكري كتب : مرحبا بكما

ما يحتاج كل هذا الكود ....

يكفي أن تكتب له هذا الكود إذا كان اللون المطوب أحمرًا 

كود :

 label1.ForeColor = Color.Red

أو يمكن تغيير لون Red إلى أي لون آخر مثل Yellow أو Black أو Blue ..... الخ

كما يمكن استبدال أداة Label إلى TextBox مثلا !

مرحبا بك ..
اعتذر لست معتادا علي الرد علي الأسئلة
ولأكني وجدته انه يريد ان يكون اللون بشرط النص
واشكرك علي التعديل المتقن اخي الكريم منك نتعلم ونستفيد

[حسن الجلب]

شكرا لحضراتكم ولكن أنا عاوز تلوين كلمه معينه وسط جمله مثل الكلمات المحجوزه في فيجوال بيسك

[أبو خالد الشكري]

(20-08-22, 01:32 PM)حسن الجلب كتب : شكرا لحضراتكم ولكن أنا عاوز تلوين كلمه معينه وسط جمله مثل الكلمات المحجوزه في فيجوال بيسك

عفوا ..

تلوين الكلمات يفضل أن تكون في أداة RitchTextBox

ولا أعتقد أنك تحتاج إلى تلوين الكلمة المحجوزة

الأفضل أن تظهر للمستخدم رسالة MessageBox تنبهه أن في حقول قاعدة البيانات التي صممتها توجد أسماء محجوزة !

[حسن الجلب]

حضرتك أنا عاوز الونها عشان الشكل الجمالي بس

[حسن الجلب]

السلام عليكم

[أبو خالد الشكري]

تمام
سوف أعمل لك مثال لتلوين الكلمات
وشكراً.

[أبو خالد الشكري]

(20-08-22, 10:33 PM)أبو خالد الشكري كتب : تمام
سوف أعمل لك مثال لتلوين الكلمات
وشكراً.

تفضل هذا الكود ،

ولكن يجب أن يكون في للفورم أداة RitchTextBox يكون فيها النص الذي تريد أن تبحث فيه
ويكون في الفورم أداة TextBox تضع فيه الكلمة التي تريد البحث عنها
أخيرا يكون عندك زر Button تضع فيه الكود التالي

كود :

RichTextBox1.SelectAll() : RichTextBox1.SelectionColor = Color.Black
       For i = 1 To RichTextBox1.TextLength
           RichTextBox1.Find(TextBox1.Text.Trim(), i, RichTextBoxFinds.MatchCase)
           RichTextBox1.SelectionColor = Color.Red
       Next

---

(20-08-22, 10:33 PM)أبو خالد الشكري كتب : تمام
سوف أعمل لك مثال لتلوين الكلمات
وشكراً.

تفضل هذا الكود ،

ولكن يجب أن يكون في للفورم أداة RitchTextBox يكون فيها النص الذي تريد أن تبحث فيه
ويكون في الفورم أداة TextBox تضع فيه الكلمة التي تريد البحث عنها
أخيرا يكون عندك زر Button تضع فيه الكود التالي

كود :

RichTextBox1.SelectAll() : RichTextBox1.SelectionColor = Color.Black
       For i = 1 To RichTextBox1.TextLength
           RichTextBox1.Find(TextBox1.Text.Trim(), i, RichTextBoxFinds.MatchCase)
           RichTextBox1.SelectionColor = Color.Red
       Next