vb.net中灰色代码,vb代码黄色
vb.net复选框及字体颜色问题 题目是图上的第十题,计算代码我会做,但是那个红字黄底的代码怎么写
TextBox1.ForeColor = Color.Red
创新互联专注于苏尼特右网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供苏尼特右营销型网站建设,苏尼特右网站制作、苏尼特右网页设计、苏尼特右网站官网定制、小程序制作服务,打造苏尼特右网络公司原创品牌,更为您提供苏尼特右网站排名全网营销落地服务。
TextBox1.BackColor = Color.Yellow
TextBox1.Text = 1234
VB.NET,如何用代码实现改变字体、颜色、加粗,以及恢复默认?
1、2和3:你怎么改的,就怎么恢复默认
3:textbox1.font=new font(字体名称,字体大小,字形),字形有加粗常规倾斜下划线等几种。
vb.net里改标签背景颜色的代码是什么啊
Label1.BackColor = Color.Red
Label1.BackColor = Color.Blue
Label1.BackColor = Color.Yellow
在vb。net中 我们制作个打字程序我想在文本框里的字母中指定一个字母变颜色的代码,要怎么写??
在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了,方便楼主参考。
有问题可以继续追问。
分享名称:vb.net中灰色代码,vb代码黄色
网页网址:http://myzitong.com/article/hsoops.html