vb.net 如何使文字能渐变颜色，就是颜色慢慢变淡然后在慢慢恢复？

也容易，如果是黑白三个颜色加上相同的渐变量，彩色的是起始颜色的三个分量与终止颜色的对应三个分量的差值，再除于相同的份数，就得出三原色各自的步进量。

我们提供的服务有：成都网站建设、成都网站设计、微信公众号开发、网站优化、网站认证、衡南ssl等。为成百上千企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的衡南网站制作公司

窗体上放个图片框试试下面代码：

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(i + Steps - 1, 1), drawFont, drawBrush, X, 50.0)

X += 18

R -= StepR

G -= StepG

B -= StepB

Next

End Sub

VB.NET，如何用代码实现改变字体、颜色、加粗，以及恢复默认?

1、2和3:你怎么改的,就怎么恢复默认

3:textbox1.font=new

font(

字体

名称，字体大小，

字形

)，字形有加粗常规倾斜

下划线

等几种。

VB.NET，如何用代码实现改变字体、颜色、加粗，以及恢复默认？

1、2和3：你怎么改的,就怎么恢复默认

3：textbox1.font=new font(字体名称，字体大小，字形)，字形有加粗常规倾斜下划线等几种。

Vb.net2010字体颜色问题?

这个问题的本质就是随机二字，无论c/s还是b/s里面的label1 ，只要随机设置字体颜色属性即可。而相关属性我相信您肯定知道，关键是怎样随机。vb.net里面有一个随机函数，只要利用该随机函数，随机生成相应的颜色即可，然后把随机颜色赋值给label的属性

分享文章：vb.net字体变色 vb程序设计字体颜色
本文地址：http://cdweb.net/article/ddcidch.html