在 Visual Basic (VB) 中，自定义对象通常涉及定义一个类，

在 Visual Basic (VB) 中，自定义对象通常涉及定义一个类，然后在代码中实例化该类。类是对象的蓝图，定义了对象的属性和方法。下面是一个详细的示例，展示如何在 VB 中定义一个自定义的 Person 类，并使用它来创建对象。

定义一个自定义的 Person 类

假设我们希望创建一个 Person 类，其中包含姓名和年龄属性，以及一个用于输出问候信息的方法。

vb

Public Class Person

' 定义私有字段

Private _name As String

Private _age As

' 构造函数，用于初始化对象的初始状态

Public Sub New(name As String, age As Integer)

_name = name

_age = age

End Sub

' 定义一个属性，用于获取和设置名字

Public Property Name As String

Get

Return _name

End Get

Set(value As String)

_name = value

End Set

End Property

' 定义一个属性，用于获取和设置年龄

Public Property Age As Integer

Get

Return _age

End Get

Set(value As Integer)

_age = value

End Set

End Property

' 定义一个方法，用于输出问候信息

Public Sub Greet()

Console.WriteLine($"Hello, my name is {_name} and I am {_age} years old.")

End Sub

End Class

实例化 Person 对象

一旦定义了 Person 类，就可以通过调用 New 关键字来创建该类的实例。

vb

Module Module1

Sub Main()

' 创建一个 Person 对象

Dim person As New Person("Alice", 30)

' 调用 Greet 方法

person.Greet()