vb RichTextBox1字体颜色

发布网友发布时间：2024-10-12 08:50

共1个回答

热心网友时间：2024-10-14 12:33

For i = 0 To 8
If RichTextBox1(i).Enabled = True Then
For j = 1 To Len(RichTextBox1(i).Text)
If Mid(Form1.Label6(i), j, 1) <> Mid(RichTextBox1(i).Text, j, 1) Then
RichTextBox1.SelStart=j
RichTextBox1.SelLength=1
RichTextBox1.SelColor = &HFF&
End If
Next
End If
Next

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com