سلام
من خیلی وقته که دارم دونبال این میگردم که مثلا اگه تو تکست بباکس نو شتم if یا end یا ' یا.... رنگ متن رو عوض کنه یا کل خط رو به رنگ دیگه در بیاره مثل و.ب
ممنون
Printable View
سلام
من خیلی وقته که دارم دونبال این میگردم که مثلا اگه تو تکست بباکس نو شتم if یا end یا ' یا.... رنگ متن رو عوض کنه یا کل خط رو به رنگ دیگه در بیاره مثل و.ب
ممنون
حداقل یکی بگه اسم این کار چیه من خودم پیداش میکنم
سلام
فکر کنم این کد مشکلت رو برطرف کنه البته برای اینکه کل متن رو رنگی کنی
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