锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net+颜色变化 vb颜色函数

IT技术颜色

vb.net 如何使文字能渐变颜色，就是颜色慢慢变淡然后在慢慢恢复？也容易vb.net 颜色变化 ， 如果是黑白三个颜色加上相同的渐变量vb.net 颜色变化，彩色的是起始颜色的三个分量与终止颜色的对应三个分量的差值vb.net 颜色变化，再除于相同的份数，就得出三原色各自的步进量 。
窗体上放个图片框试试下面代码vb.net 颜色变化：
Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint
Dim startColor As Color = Color.Red
Dim endColor As Color = Color.Green
Dim s As String = "vb.net 如何使文字能渐变颜色，就是颜色慢慢变淡然后在慢慢恢复？"
Dim Steps As Integer = s.Length \ 2
Dim StepR As Integer = (CInt(endColor.R) - startColor.R) \ Steps
Dim StepG As Integer = (CInt(endColor.G) - startColor.G) \ Steps
Dim StepB As Integer = (CInt(endColor.B) - startColor.B) \ Steps
Dim R As Integer = startColor.R
Dim G As Integer = startColor.G
Dim B As Integer = startColor.B
Dim drawFont As New System.Drawing.Font("Arial", 16)
Dim X As Integer = 50
For i As Integer = 1 To Steps
Dim drawBrush As New SolidBrush(Color.FromArgb(R, G, B))
e.Graphics.DrawString(s.Substring(i - 1, 1), drawFont, drawBrush, X, 50.0)
X= 18
R= StepR
G= StepG
B= StepB
Next
For i As Integer = 1 To Steps
Dim drawBrush As New SolidBrush(Color.FromArgb(R, G, B))
e.Graphics.DrawString(s.Substring(iSteps - 1, 1), drawFont, drawBrush, X, 50.0)
X= 18
R -= StepR
G -= StepG
B -= StepB
Next
End Sub
vb.net怎么实现单击数字区域的按钮使按钮变红色，单击运算符按钮变蓝色同时数字区按钮还原？紧急在线等…您好，这种方法可以通过按钮的MouseDown和MouseUp事件来实现，比如说 ， 当单击按钮RedColor（RedColor为这个按钮的Name属性的属性值）的时候，要使按钮的颜色变成红色，这可以在代码视图中的控件选择下拉列表中选择RedColor这个控件，然后在右边的事件下拉列表中选择MouseDown事件（当按下鼠标时发生），这时 ， Visual Studio会自动生成如下代码：
Private Sub RedColor_MouseDown(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles RedColor.MouseDown
End Sub
接下来就在当前生成的代码中写入如下代码：
RedColor.BackColor = Color.FromArgb(255, 0, 0)
这句代码的作用是利用Color下的FromArgb方法来设置RGB颜色参数，在RGB颜色系统中 ， R代表红色，G代表绿色，B代表蓝色 ， 根据这三种颜色的不同程度的调和，就会得到不同的颜色 ， 如果您要得到深色的天蓝色，则可以设置FromArgb(0, 191, 255)，这个颜色转换为HTML中的RGB颜色就是#00BFFF 。
当然颜色还原最好是写在MouseUp事件里面，这样就不必在单击其他按钮时来还原上一次按下的按钮的颜色，在这里，为了方便描述，我们假设按钮的默认颜色为白色，也就是FromArgb方法设置为FromArgb(255, 255, 255)的时候，所标示的颜色就是白色
所以选择了RedColor按钮的MouseUp事件后，Visual Studio会自动生成下列代码：
Private Sub RedColor_MouseUp(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles RedColor.MouseUp
End Sub
MouseUp的含义是当鼠标弹起时发生，所以在这个事件就可以设置按钮颜色的还原 ， 即添加下列代码来实现：
RedColor.BackColor = Color.FromArgb(255, 255, 255)
当然，这就编写好了一个按钮按下时变色，回弹时还原的功能，至于另外一个按钮的功能，这与这个按钮的功能一样，只是代码有一些细微的差别而已，假设这个按钮的Name属性的属性值为BlueColor ， 相应的代码对应如下：
Private Sub BlueColor_MouseDown(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles BlueColor.MouseDown
BlueColor.BackColor = Color.FromArgb(0, 0, 255)'蓝色的FromArgb
End Sub
Private Sub BlueColor_MouseDown(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles BlueColor.MouseDown
BlueColor.BackColor = Color.FromArgb(255, 255, 255)
End Sub
另外，为了避免代码的冗余 ， 可以将RedColor和BlueColor的MouseUp事件进行合并，这合并后的代码如下：
Private Sub BlueColor_MouseDown(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles BlueColor.MouseDown, RedColor.MouseUp
BlueColor.BackColor = Color.FromArgb(255, 255, 255)
RedColor.BackColor = Color.FromArgb(255, 255, 255)
End Sub
【vb.net 颜色变化 vb颜色函数】当然，这个你只要分析了控件事件代码的基本结构，一切就一目了然了 ， 控件事件代码的基本结构如下：
[作用域] Sub 事件名([参数列表]) Handles 控件事件1 [, 控件事件2, 控件事件3...]
[事件代码区域]
End Sub
如果此回答对您有帮助，别忘了采纳哦，如果没有解决您的问题，您可以在互联网上寻找更多关于此问题的解决方案 ， 谢谢！
怎样可以改变vb.net中的datagrid控件中某个单元格的颜色在Private Sub DataGridView1_CellFormatting(.....)事件中加入代码：
e.cellstyle.baclcolor=color.red
VB.NET文本框颜色变不了，为什么最后LBLNo1的背景色始终是绿色和红色 点击它的第一时间不应该是白色吗？你没有写刷新功能嘛，如LblResult.BackColor = Color.LightCoral后面再加一句LblResult.refresh()就实现了背景色变换！
vB.net如何在信号输入时,直线颜色发生变化不用代码画线，vb.net 颜色变化你用LINE　对象吧
就是形状中的直线
就可以随时修改颜色vb.net 颜色变化了
关于vb.net 颜色变化和vb颜色函数的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：java经典代码1000的简单介绍

    下一篇：linux进程命令，linux进程命令有哪些