如何让vb中的label或text中的部分文字变颜色

Vb中Label或者Text只能设置一种文字颜色，无法使部分文字变色 但可以换一种思路，例如 在label中，如果想将部分文字设为其他颜色，可以在label控件上再加一个与这些文字宽度相等的新的label，平时隐藏，改变文字时，显示，并使它上面的文字显示为制定颜色，且调整位置至与原来的文字重叠，就可以达到使部分...

Label1.ForeColor=vbRed'字体颜色改为红色 Label1.AutoSize=True'label随文字内容自动改变大小 EndSub

解决VB点击命令按钮代码问题，需要添加一个label的Change事件。例如，当label显示数值5时，改变Text1中的文字颜色为红色。具体代码如下：在Private Sub Label1_Change()方法中，编写以下内容：若Label1的Caption属性等于5，则执行以下操作：Text1的ForeColor属性设置为vbRed，实现文字颜色变为红色。通过此方法...

Label1.ForeColor = vbRed '字体颜色改为红色 Label1.AutoSize = True 'label随文字内容自动改变大小 End Sub

Label1.Font = "楷体"调整其字体大小，例如设置为50号字体:Label1.FontSize = 50 要更改字体颜色，你可以将其设置为红色，代码如下:Label1.ForeColor = vbRed 另外，如果你想让Label的文字大小随文字内容自动调整，可以启用AutoSize属性:Label1.AutoSize = True 以上就是在VB中更改Label标签文字的...

那很简单啊，只要增加一个label的Change事件即可，代码如下（假如当label出现5时、TEXT 里的文字颜色改变成红色）：Private Sub Label1_Change()If Label1.Caption = 5 Then Text1.ForeColor = vbRed End Sub

只有richtextbox有这种功能，如果字符串在标签里、在标题中就不能实现了。Private Sub Command1_Click()RichTextBox1.SelColor = vbGreen End Sub 被选中的字符变成绿色，当然选中的字符可以用代码给出。张志晨

' 本模块可让你改变命令按钮的文本颜色。 ' 使用方法: ' ' - 在设计时将文本的Style设为Graphical. ' ' - 随意设定背景色和图象属性. ' ' - 在Form_Load中调用 SetButton : ' SetButton Command1.hWnd, vbBlue ' (你可以任意次的调用该过程甚至不必先调用 RemoveButton.) ' ' - 在...

Label6.ForeColor = NewColor Label7.ForeColor = NewColor Label8.ForeColor = NewColor Label9.ForeColor = NewColor Label10.ForeColor = NewColor End Sub 需要的时候，用需要的颜色作为参数，调用该过程只要一句代码 比如：蓝色 Call SetColor(vbBlue)比如：红色 Call SetColor(vbRed)...

创建一个Time控件、Label1控件，代码如下：Private Sub Form_Load()Timer1.Interval = 500End SubPrivate Sub Timer1_Timer()a = Int(Rnd * 256)b = Int(Rnd * 256)c = Int(Rnd * 256)Label1.ForeColor = RGB(a, b, c)End Sub就可以实现Label1控件的字体随机颜色变换。