0

真的很奇怪，我找不到任何关于标题的东西。我的问题是我有一个class1.vb包含Function read. 该函数基本上string ByVal从 my中接收 a，Reading.aspx.vb它基本上是一个文本。然后它会读取该文本并搜索一个单词。如果找到“海”这个词，那么Function read Returns a MsgBox("found")。

在我Reading.aspx.vb的 中，文本字符串是通过Reading.aspx.vb调用函数从我的代码传递的：

读取.aspx.vb

 Dim rd as new class1
 rd.read(txtString)

类1.vb

>  Public Function Read(ByVal value1 As String)

代码阅读到这里并搜索单词sea

如果找到该单词sea，则 Function Read返回，Found否则返回Not found。

Function Read我的问题是如何确定Read1.aspx.vb表单的返回值是什么。因为我打算从我的Read.aspx.vb表格中检查Function read返回的内容。如果返回found则停止循环遍历其他文本文件，如果返回Not found则继续在Read.aspx.vb. 所以我的问题是如何Class1.vb Function Read()从我的Read.aspx.vb表单中确定我的返回值并采取相应的行动。有什么想法或建议吗？

4

1 回答 1

0

我从你的问题中了解到，你有这样的事情：

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

你没试过这个吗？

于 2013-01-28T13:42:44.810 回答