Asp.net 检查class.vb中定义的函数从.aspx.vb表单返回的情况

真奇怪，我找不到任何关于这个标题的东西。我的问题是我有一个

class1.vb

文件，它有一个

函数read

。该函数基本上从my

Reading.aspx.vb

接收一个基本上是文本的

字符串ByVal

。然后它读取该文本并搜索一个单词。如果找到单词“sea”，则函数read返回一个MsgBox（“found”）

在my

Reading.aspx.vb

中，通过以下方式调用函数，从my

Reading.aspx.vb

传递文本字符串：

Read.aspx.vb

 Dim rd as new class1
 rd.read(txtString)

>  Public Function Read(ByVal value1 As String)

class1.vb

 Dim rd as new class1
 rd.read(txtString)

>  Public Function Read(ByVal value1 As String)

在这里阅读代码并搜索单词

sea

如果找到单词

sea

，则

函数读取

返回

已找到

否则返回

未找到

---

我的问题是如何从我的

Read1.aspx.vb

表单中确定函数Read的返回值。因为我计划做的是从我的

Read.aspx.vb

表单检查

函数Read

返回的内容。如果返回

found

，则停止在其他文本文件中循环，如果返回

notfound

，则继续执行

Read.aspx.vb

中定义的循环。因此，我的问题是如何从我的

Read.aspx.vb

表单中确定我的

Class1.vb函数Read（）

的返回值并相应地执行操作。有什么想法或建议吗

我从你的问题中了解到，你有这样的想法：

Public Class Test
    Public Function Read(ByVal value As String) As String
        If (value.Contains("sea")) Then
            Return "Found"
        End If

        Return "Not Found"
    End Function        
End Class

所以，你所要做的就是

If (rd.Read("Lorem Ipsum Dolor Sit Amet sea Lorem") = "Found") Then
    DoSomethingWhenFound()
Else
    DoSomethingWhenNotFound()
End If

---

您没有试过吗？

您是否从函数返回了一些内容？？或者messagebox是调用的函数的某个ind，并且没有从中返回任何内容function@RohithNair不，我从函数返回的唯一内容是该消息。也就是说，我可以知道“好的，我在那段文本中没有找到单词

sea

，然后我将传递另一段。但是我需要知道从我的

Read.aspx.vb

.private函数FnName（argList）返回的消息

找到了还是没有找到作为返回类型…结束函数。这将返回所需的类型，您可以将其分配给变量并进行检查；对吗？读取函数签名不应该是
Public Function Read（ByVal value1作为String）作为String
？@MarcusVinicius ok，但我想在我的
Read.aspx.vb
中写的是如果
rd.Read返回”找不到“
然后做一些事情，反之亦然。这可能吗？我在考虑，认为我必须以不同的方式做，现在尝试，有一些错误，它起作用了。可能建议返回TRUE/FALSE，而不是“find”“not found”，因为“find”与“find”不同，因为字母大小写（上/下）…只需将函数声明更改为：Public function Read（ByVal值作为字符串）为布尔值，并返回True或False，而不是“Found”“Not Found”Yes@ZafKhan，最好是返回布尔值。