رنگی کردن متن خاص در vb (مثل خوده vb)

[shahrdartoope]

سلام

من خیلی وقته که دارم دونبال این میگردم که مثلا اگه تو تکست بباکس نو شتم if یا end یا ' یا.... رنگ متن رو عوض کنه یا کل خط رو به رنگ دیگه در بیاره مثل و.ب

ممنون

[shahrdartoope]

حداقل یکی بگه اسم این کار چیه من خودم پیداش میکنم

[blackroos]

سلام
فکر کنم این کد مشکلت رو برطرف کنه البته برای اینکه کل متن رو رنگی کنی
Private Sub Text1_Change()
If InStr(1, Text1.Text, "vb") Or InStr(1, Text1.Text, "end") Then
Text1.ForeColor = &H80000001
Else
Text1.ForeColor = &HFF&
End If
End Sub