VBA 中的公共对象模块是什么

在VBA中，公共对象模块是一种特殊的模块，它允许我们在同一个工程中的多个VBA模块之间共享公共对象。这些公共对象可以是变量、常量、过程、函数、类等，它们可以在整个工程中被访问和使用。公共对象模块的主要作用是提供一种集中管理和共享代码的方式，提高代码的可维护性和复用性。

' 定义一个公共变量
Public myVariable As String
' 定义一个公共函数
Public Function AddNumbers(a As Integer, b As Integer) As Integer
    AddNumbers = a + b
End Function
' 定义一个公共过程
Public Sub PrintMessage(message As String)
    MsgBox message
End Sub

Sub Main()
    ' 访问公共变量
    myVariable = "Hello, VBA!"
    ' 调用公共函数
    Dim result As Integer
    result = AddNumbers(2, 3)
    ' 调用公共过程
    PrintMessage "The result is: " & result
End Sub

vba
' 公共对象模块
' 定义一个公共类
Public Class Student
    Public Name As String
    Public Score As Double
End Class

vba
' 模块1
Sub Main()
    ' 创建学生对象
    Dim student1 As New Student
    
    ' 设置学生的姓名和成绩
    student1.Name = "Alice"
    student1.Score = 90
    
    ' 调用其他模块中的过程
    PrintStudentInfo student1
End Sub

vba
' 模块2
Sub PrintStudentInfo(student As Student)
    ' 打印学生的姓名和成绩
    MsgBox "Name: " & student.Name & vbNewLine & "Score: " & student.Score
End Sub