Question

如何在运行后调用模块或其他内容将数据返回给我。我不想让我的form1代码变得凌乱。

谢谢！

我的意思是返回的例子：

Public Function Test() As String
    Return "Tes34t"
End Function

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    MessageBox.Show(Test)
End Sub

Answer 1

如果Test属于同一个类（Form1），则只需使用

MessageBox.Show(Test())

如果它在模块“MyModule”中，则使用

MessageBox.Show(MyModule.Test())

Answer 2

可能使用通用集合：

Public Class MyObjectCollection
    Inherits Collection<MyObject>

    Public ReadOnly Property InnerList As List<MyObject>
        Get
            Return CType(List,List<MyObject>Wink
        End Get
    End Property

    Public Sub Sort(ByVal comparer As IComparer)
        InnerList.Sort(comparer)
    End Sub

    Public Class MyObjectCollection
    End Class
End Class

VB.net模块像函数一样返回数据

2 个答案: