从品牌网站建设到网络营销策划,从策略到执行的一站式服务
TextBox1.ForeColor = Color.Red
创新互联专注于苏尼特右网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供苏尼特右营销型网站建设,苏尼特右网站制作、苏尼特右网页设计、苏尼特右网站官网定制、小程序制作服务,打造苏尼特右网络公司原创品牌,更为您提供苏尼特右网站排名全网营销落地服务。
TextBox1.BackColor = Color.Yellow
TextBox1.Text = 1234
1、2和3:你怎么改的,就怎么恢复默认
3:textbox1.font=new font(字体名称,字体大小,字形),字形有加粗常规倾斜下划线等几种。
Label1.BackColor = Color.Red
Label1.BackColor = Color.Blue
Label1.BackColor = Color.Yellow
在TextChanged事件中:privatevoidrichTextBox1_TextChanged(objectsender,EventArgse)
{
if(label1.Text==richTextBox1.Text)
richTextBox1.ForeColor=Color.Black;
else
richTextBox1.ForeColor=Color.Red;
}-------------------继续答复:
首先,还是建议你使用TextChange方法。KeyPress方法只有在松开键后才触发,如果一直按着键比如写a,那这串a颜色不会变的,直到你松手。
然后上代码,测试可用的,你直接放到KeyPress里也能用:
PrivateSubrichTextBox1_TextChanged(senderAsObject,eAsEventArgs)
ForiAsInteger=0TorichTextBox1.TextLength-1
richTextBox1.SelectionStart=i
richTextBox1.SelectionLength=1
Ifi=label1.Text.LengthThen
richTextBox1.SelectionColor=Color.Blue
ElseIflabel1.Text(i)richTextBox1.Text(i)Then
richTextBox1.SelectionColor=Color.Red
Else
richTextBox1.SelectionColor=Color.Black
EndIf
Next
richTextBox1.SelectionLength=0
richTextBox1.SelectionStart=richTextBox1.TextLength
EndSub这里写错的是红色,多写出来的是蓝色,具体你自己可以调整。
顺便鄙视一下那个把我代码直接转VB贴上来的,我直接用工具转成VB了,方便楼主参考。
有问题可以继续追问。
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图