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

نسخة كاملة : تلوين كلام محدد بلون معين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم ورحمه الله وبركاته عايز كود او مصاب لتلوين كلمه معينه بلون معين مثل الفيجوال بيسك
(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 مثلا !
(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
الصفحات : 1 2