vb.net颜色怎么写 vb中颜色代码
在VB。NET里随机色的代码怎么写
Dim r as new Random
目前创新互联已为千余家的企业提供了网站建设、域名、网页空间、网站托管、企业网站设计、黎平网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。
Dim m_Color As Color=Color.FromArgb(255,r.Next(0,255),r.Next(0,255),r.Next(0,255))
vb.net复选框及字体颜色问题 题目是图上的第十题,计算代码我会做,但是那个红字黄底的代码怎么写
TextBox1.ForeColor = Color.Red
TextBox1.BackColor = Color.Yellow
TextBox1.Text = 1234
在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中颜色怎么写 。。。。BackColor &H00808080& 这个怎么看啊
vb中的颜色
VB中 H80000000(16进制8位,8开头) 这种 方式表示的颜色代表系统默认的各项设置的颜色
比如按钮,窗体
其他的就是 RGB颜色值
RGB 颜色值的范围就是 H0-HFFFFFF
HBBGGRR BB 是蓝色,GG是绿色,RR是红色 范围都是 0-255
从颜色中分离 红绿蓝
r = (color And HFF)
g = (color And HFF00) \ 256
b = (color And HFF0000) \ 65536
将红绿蓝合为一种颜色
color = b * H10000 + g * H100 + r
本文标题:vb.net颜色怎么写 vb中颜色代码
链接地址:http://myzitong.com/article/dohcphh.html