控制VB某个字体颜色
答案:1 悬赏:70
解决时间 2021-02-19 01:07
- 提问者网友:血樱陌殇
- 2021-02-18 17:48
如果是在text里面输入某个特定的字,或某些特定数字在label1它里面显示并带有颜色,如:在text里面输入81 45 69 27,在text和label里面显示并且"81"都显示为红色.
最佳答案
- 二级知识专家网友:傲娇菇凉
- 2021-02-18 19:25
Textbox做不到
用richTextbox
这个要与commonDialog控件一起使用。
比如你设置了一个菜单栏。有一项就是“颜色”。关键字为color。
Private Sub color_Click()
commonDialog1.DialogTitle = "颜色设置"
commonDialog1.Flags = 1
commonDialog1.ShowColor
richtextbox1.SelColor = cd1.Color
End Sub
这段代码就是调用了commondialog控件,就是通用对话框的颜色设置。
你说的对单个字进行设置,就是对鼠标所选文字进行设置。
这样就ok了。。
Private Sub Command1_Click()
RichTextBox1.SelStart = 4 '记得是从0开始的.所以5就是4了..
RichTextBox1.SelLength = 1
RichTextBox1.SelColor = vbRed
End Sub
用richTextbox
这个要与commonDialog控件一起使用。
比如你设置了一个菜单栏。有一项就是“颜色”。关键字为color。
Private Sub color_Click()
commonDialog1.DialogTitle = "颜色设置"
commonDialog1.Flags = 1
commonDialog1.ShowColor
richtextbox1.SelColor = cd1.Color
End Sub
这段代码就是调用了commondialog控件,就是通用对话框的颜色设置。
你说的对单个字进行设置,就是对鼠标所选文字进行设置。
这样就ok了。。
Private Sub Command1_Click()
RichTextBox1.SelStart = 4 '记得是从0开始的.所以5就是4了..
RichTextBox1.SelLength = 1
RichTextBox1.SelColor = vbRed
End Sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯