Reference 对象的 Major 属性返回一个只读的 Long 值,标识引用的应用程序的主版本号。
expression.Major
expression 必需。返回“应用于”列表中的一个对象的表达式。
Major 属性仅在使用 Visual Basic 时使用。
Major 属性返回版本号中的十进制小数点左边的值。例如,如果已经设置了对版本号为 2.5 的应用程序的引用,Major 属性将返回 2。
下面的示例将显示一条消息,包含当前项目中所有引用的有关信息。
Dim r As Reference
Dim strInfo As String
For Each r In Application.References
strInfo = strInfo & r.Name & " " & r.Major & "." & r.Minor & vbCrLf
Next
MsgBox "Current References: " & vbCrLf & strInfo