Dim myClass As JavaClass

Dim myProperty As JavaProperty

Set mySession = New JavaSession()

Set myClass = mySession.GetClass("java/lang/Short")

Set myProperty = myClass.GetProperty("MIN_VALUE")

' java.lang.Short.MIN_VALUE has modifiers:

' public = 1

' static = 8

' final = 16

' Modifier value is 25

Print "MIN_VALUE Modifier is " myProperty.Modifier