-3

我制作了程序女巫颜色文本的不同部分(如记事本++),但我有问题。

这是代码的一部分,在Class1中

Public Shared Function get_c_html()
    Dim html_words As New List(Of String) From {"<html>", "<title>", "<b>" _
    , "</b>", "<u>", "</u>", "<i>", "</i>", "<sub>", "</sub>", "<sup>", "</sup>", "<a href" _
    , "</a>", "<body>", "</body>", "<head>", "</head>", "</font>", "<font>", "<div", "</div", "<title>" _
    , "</title>", "<img", "/>", "<link", "<br>", "<ul>", "</ul>", "<li>", "</li>" _
    , "<table>", "</table>", "<tr>", "</tr>", "<td>", "</td>", "<meta>", "</meta>" _
    , "meta", "<background>"}
    Dim icountMatch As Integer = 0
    For Each blue As String In html_words
        icountMatch = HighlightWords(Form1.rchtml, blue, Color.Blue)
    Next
    Return 0
End Function

程序正常工作并突出显示文本,但如果我在 html_words 中添加“/html”,程序不会启动。

我尝试添加另一个公共共享功能,但给了我同样的“错误”。

4

1 回答 1

0

程序正常工作并突出显示文本,但如果我在 html_words 中添加“/html”,程序不会启动。

列表语句工作正常。问题很可能是 HighlightWords 函数。

附带说明,如果您不打算返回有意义的值,则应使用 Sub 而不是函数

于 2013-08-11T04:36:30.553 回答