成都创新互联网站制作重庆分公司

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://cxhlcq.com/article/dohcphh.html

其他资讯

在线咨询

微信咨询

电话咨询

028-86922220(工作日)

18980820575(7×24)

提交需求

返回顶部