Vb.net 填充一个类，然后稍后使用它

我有一门课

Public Class Location
    Public Name As String
    Public Column As Integer
    Public Row As Integer
    Public Occupant As String
End Class

在我的代码中，我有一个子例程来填充这个类

Sub Populate Location(ByValue coordinate As String)
    Dim Here As New Location
    Here.Location = coordinate.SubString(0,3)
    Here.Column = SomeFunction(coordinate, Gere.location)
    Here.Row = AnotherFunction(coordinate, Here.Column)
    Here.Occupant = ArrayOfOccupant(column, row)
End Sub

所有这些只需按下一个按钮即可完成。 稍后，我想单击另一个按钮并使用Here类执行其他操作

---

我的选项是什么或搜索什么？

实际上，您的类对象只存在于该过程中

此处的Dim作为新位置的变量声明、实例 '范围是此模块或窗体 子PopulateLocationByValue坐标作为字符串 '假设这可能会被重用，请创建一个新实例 此处=新位置 此处。位置=坐标。子字符串0,3 Here.Column=SomeFunctioncoordinate，Here.location Here.Row=另一个函数坐标，Here.Column Here.Occupant=ArrayOfOccupantcolumn，row 端接头

---

该模块中的其他子模块将可以访问此处，因为它现在具有类/模块级别的作用域

，您的类对象只存在于该过程中

此处的Dim作为新位置的变量声明、实例 '范围是此模块或窗体 子PopulateLocationByValue坐标作为字符串 '假设这可能会被重用，请创建一个新实例 此处=新位置 此处。位置=坐标。子字符串0,3 Here.Column=SomeFunctioncoordinate，Here.location Here.Row=另一个函数坐标，Here.Column Here.Occupant=ArrayOfOccupantcolumn，row 端接头

---

该模块中的其他子模块将可以访问此处，因为它现在具有类/模块级别的作用域

您的子模块甚至没有按编写的方式编译。请只发布可编译的代码。您的Sub甚至没有按编写的方式编译。请只发布可编译的代码。该方法无法正确编译，因为该方法的名称中有空格。@ChrisDunaway很好，我显然只是复制了他的代码块作为起点。修复。该方法无法正确编译，因为该方法的名称中有空格。@ChrisDunaway很好，我显然只是复制了他的代码块作为起点。固定的