2

我正在RichTextBox使用语法高亮创建一个，我的实际代码可以检查与其他单词用空格分隔的单词或没有该语句的单词： 

        If RichTextBox1.SelectedText = " " Or RichTextBox1.SelectedText = Nothing Then

所以当我在它上面输入“test”（我突出显示的单词）RichTextBox变成蓝色时，它适用于所有情况，除了当我输入“test”时，它变成蓝色，然后我按下回车，它又变成黑色，就像如果有单词后面的一个字符。
我想换行符是由一个字符表示的RichTextBox，这就是为什么它没有被重新定义为“测试”，那么我必须在 if 上添加什么字符以便它可以检查？

我试过这样： 

If  RichTextBox1.SelectedText = "\n" Then

和： 

If RichTextBox1.SelectedText = VbNewLine Then

但两者都不起作用，任何人都知道表示“这里是新行”的字符吗？

4

1 回答 1

3

它是一个 chr(10)，一个换行符。如果要单独处理每一行，也可以使用 RichTextBox1.Lines。

这是查看 RichTextBox 中单字节字符的一种方法：

For i = 1 To Len(rtext1.text)
  s = s & Asc(Mid(rtext1.text, i, 1)) & "  "
  Next i
MsgBox(s)
于 2013-01-24T00:58:23.530 回答