Question

我有以下结构

Public Structure Info_Diag_Data
    Public DataOne As String
    Public DataTwo As String
End Structure

这个函数使用上面的类

Public Shared Function My_Function(ByVal RcvVal As Integer) As Info_Diag_Data

    Dim SendVal As Info_Diag_Data

    Select Case RcvVal
        Case 1
            SendVal.DataOne = "Red"
            SendVal.DataTwo = "Master"
        Case 2
            SendVal.DataOne = "Red"
            SendVal.DataTwo = "Teacher"
    End Select

    Return SendVal
End Function

现在我知道我可以使用My_Function(2)

执行此功能

我的问题是如何在从函数中获取这两个返回值后显示这些数据。

就像我得到DataOne和DataTwo一样。然后，我如何在MessageBox.Show(DataOne)和MessageBox.Show(DataTwo)

中展示它

Answer 1

您需要将结果存储在Info_Diag_Data值中，然后您才能通过该变量访问对象的各个成员，如下所示：

Dim data As Info_Diag_Data = My_Function(2)
MessageBox.Show(data.DataOne)
MessageBox.Show(data.DataTwo)

如何在.NET中显示函数的多个返回值

1 个答案: